[Ahmed_Mansoor]

أهلا أخي الكريم , قم بتعديل الجزء التالي من كود الإجراء الموجود في أعلى كود الفورم الإجراء الذي إسمه Add_Customer_Data_Into_Excel :

PHP كود :

If Trim$(ExcelWS.Cells(I, 12).Value) = Trim$(Text1.Text) Then
          'إذا كان إسم العميل موجود يتم وضع رقم الصف الموجود فيه في هذا المتغير
          zRow_Number = I
          Is_Added_Befor = True
          Exit For
       End If 


إستبدله بهذا الكود , هذا الكود هو نفس الجزء من كود الإجراء لكن تم تعديله قليلاً ستلاحظ الفرق بينهما ليس بالكثير :

PHP كود :

If Trim$(ExcelWS.Cells(I, 12).Value) = Trim$(Text1.Text) And _
          Trim$(ExcelWS.Cells(I, 1).Value) = Trim$(Text39.Text) Then
          'إذا كان إسم العميل موجود يتم وضع رقم الصف الموجود فيه في هذا المتغير
          zRow_Number = I
          Is_Added_Befor = True
          Exit For
       End If