عمر الجزاوى قام بنشر ديسمبر 18, 2020 قام بنشر ديسمبر 18, 2020 الشرح داخل الملف جدول.xlsmFetching info...
حسين مامون قام بنشر ديسمبر 18, 2020 قام بنشر ديسمبر 18, 2020 ان كان ما تقصد هو نسخ الفاتورة ولصقها في اخر صف فارغ من نفس الورقة فاليك هذه التجربة المتواضعة ******تحياتي******* Sub copy_fact() Dim lr lr = Cells(Rows.Count, "g").End(3).Row + 5 Range("A1:H33").Copy Range("a" & lr) End Sub جدول.xlsmFetching info... 3
عمر الجزاوى قام بنشر ديسمبر 18, 2020 الكاتب قام بنشر ديسمبر 18, 2020 تسلم تسلم يمينك هذا هو المطلوب بالضبط 1
الردود الموصى بها