تعديل الفاتورة

[husain alhammadi]

السلام عليكم و رحمة الله و بركاتة

اخواني الخبراء ارجوا مساعدتي

Private Sub CommandButton2_Click()
Sheet6.Range("k2").Value = Sheet5.Range("F7").Value
Dim x As Integer
x = Sheet6.Range("L2").Value
Sheet6.Cells(x, "B").Value = Sheet5.Range("B7").Value
Sheet6.Cells(x, "C").Value = Sheet5.Range("F7").Value
Sheet6.Cells(x, "D").Value = Sheet5.Range("B9:B28").Value
Sheet6.Cells(x, "e").Value = Sheet5.Range("d9:d28").Value
Sheet6.Cells(x, "D").Value = Sheet5.Range("B9:B28").Value
MsgBox "تم تعديل بيانات الفاتورة بنجاح"
End Sub

فكود تديل الفاتورة 

برنامج المستودع.xlsb

[محمد هشام.]

ادا كنت تقصد تعديل  بيانات اسم الصنف والكمية فقط  تفضل جرب  بعد استدعاء البيانات بشرط رقم الفاتورة 

 

 

 

 

 

 

برنامج المستودع 5 (1).xlsb

تم تعديل نوفمبر 3, 2023 بواسطه محمد هشام.

[husain alhammadi]

استاذ محمد هشام جزاك الله خير الجزاء

هل يمكنني وضع كود في  Sheet13  بمسح البرنامج فى حالة تعديل او مسح او اضافة  في Sheet13 فقط

تم تعديل نوفمبر 3, 2023 بواسطه husain alhammadi

[محمد هشام.]

1) قم بتحميل المرفق أولا والتأكد من  حصولك على الإجابة المتوقعة بخصوص تعديل البيانات ... !!!!

2) قم بفتح موضوع جديد بطلبك وسوف نحاول كالعادة مساعدتك قدر المستطاع 

تم تعديل نوفمبر 3, 2023 بواسطه محمد هشام.