direk yazdırma

[osmandemir]

herkese kolay gelsin elimde kullandığım bir kod var.buna butona bastığımda direk yazdırma eklemek istiyorum .yardımcı olumusunuz
kod:
Sub SATIR_SİL()
Sheets("Sayfa3").Rows("1:12").Delete
End Sub

 

[Ayhan Ercan]

Merhaba

Sub SATIR_SİL()
Sheets("Sayfa3").Rows("1:12").Delete
Sheets("Sayfa3").PrintOut
End Sub