تكرار طباعة صفوف اسفل كل ورقة من ملف اكسيل

[ربيع7]

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

عنوان مخالف جداً ... تـــم تعديل عنوان المشاركة ليعبر عن طلبك

[عبدالفتاح في بي اكسيل]

غير واضح السؤال😕

[هانى محمد]

من فضلك ارفع ملف موضح به المطلوب بكل دقة فلا يمكن العمل على التخمين ... وتجنباً لإهدار وقت الأساتذة

[yassershatta]

يمكنك اختيار الشيت وكذلك خلية لليسار واخرى للوسط واخرى لليمين

Private Sub CommandButton1_Click()
' prnt Macro
With ActiveSheet.PageSetup
.LeftHeader = Sheet1.Range("a2")
.CenterHeader = Sheet1.Range("b2")
.RightFooter = Sheet1.Range("c2")
.LeftFooter = Sheet1.Range("a22")
.CenterFooter = Sheet1.Range("b22")
.RightFooter = Sheet2.Range("a23")
End With
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
        IgnorePrintAreas:=False
End Sub

 

[احمد ابوزيزو]

سيتم تجربة الكود 

شكرا لمجهودك