yassershatta
-
Posts
4 -
تاريخ الانضمام
-
تاريخ اخر زياره
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
مشاركات المكتوبه بواسطه yassershatta
-
-
بالتوفيق وعلى بركة الله
-
عمل رائع ومجهودمشكور
تكرار طباعة صفوف اسفل كل ورقة من ملف اكسيل
في منتدى الاكسيل Excel
قام بنشر
يمكنك اختيار الشيت وكذلك خلية لليسار واخرى للوسط واخرى لليمين
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