YAZDIRMA

[vasifokur]

Merhabalar . Sayfa isimleri giriş,nakit,puantaj ve bordro olan 4 sayfalık bir çalışmam var. Tüm sayfaları yazdırmak için bir makro uyarlayabiliyorum.
Sorum şu : İstediğim sayfa ya da sayfaları yazdırmak istesem (Örneğin bazen 2 sayfayı , bazen 3 sayfayı , bazen de tüm sayfaları)bunu kolay bir yolu var mı ? Yardımlarınız için teşekkürler.

 

[Seyit Tiken]

Bu kodları kendinize göre uyarlayınız.

Sub Düğme1_Tıklat()
ActiveSheet.PrintOut
End Sub
------------------------------
Sub Düğme5_Tıklat()
Sheets("Sayfa2").PrintOut
End Sub
------------------------------
Sub Düğme6_Tıklat()
For a = 1 To 2
Sheets(a).PrintOut
Next
End Sub

 

[vasifokur]

SAYIN SEYİT BEY ;
İLGİNİZE TEŞEKKÜR EDİYORUM.

 

[Seyit Tiken]

Butonlar bir sayfada olsun. Bu sayfadan diğer sayfaları yazdırabilirsiniz.