Belirlenen Hücre Aralığının Çıktısını Almak

[sakincekirge]

Merhaba Arkadaşlar;
Bir çalışma sayfasında belirli verilerim var, fakat ben bu verilerden sadece bir alanı yazdırmak istiyorum. Örneğin genel çalışma kitabındaki, sayfa1 de bulunan A1:H30 hücre aralığını, aynı çalışma sayfasına koyacağım bir butona atayacağım makro ile yazıcıya göndermek istiyorum. Bu makronun kodları nasıl olmalı?

 

[AS3434]

Aşağıdaki kodu deneyin.

Sub Yaz()
ActiveSheet.PageSetup.PrintArea = "$a$1:$h$30"
ActiveSheet.PrintOut From:=1, Copies:=1, preview:=False, Collate:=True
End Sub

 

[sakincekirge]

çok teşekkür ederim