makro ile diğer sayfalardan istediğimiz kadar yazdırmak

[halilpal]

selam benim benzer bir sorum olacak
mesela sayfa1 e makro ekleyip sayfa2 den 2 çıktı sayfa3 ten 4 adet çıktı ve sayfa4 ten 3 çıktı almak istiyorum makro nasıl olacak yardımcı olursanız sevinirim

 

[Recep İpek]

Sub Yazdır()

Sheets("Sayfa2").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

Sheets("Sayfa3").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=4, Collate:=True

Sheets("Sayfa4").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=3, Collate:=True

Sheets("Sayfa1").Select
End Sub

kodlarını deneyiniz.

 

[halilpal]

allah razı olsun teşekkürler mükemmel çalışıyor