İstemediğim sütunlar yazıcıdan çıkmasın

[heyredkit]

Ýstemediğim sütunlar yazıcıdan çıkmasın

selam arkadaşlar
excel de bir tablo yaptım ve yazıcıdan çıktısını almak istiyorum. ancak yazdırmak istemediğim sütunlar var.
Ã?rnek kod aşağıda:

Sub KASA_YAZALANI_BELİRLE()
bilgi = "Yazdırmak istediğiniz hücre aralığını girin. Aşağıda bir örnek verilmiştir. Size uygun olanını yazmak için silin ve yazın. TAMAM Düğmesine tıklayın.İPTAL düğmesine tıklarsanız bütün tabloyu seçersiniz ki bu da istemiş olduğunuz bir durum olamaz."
düğme = "A2:B30,E2:F30"
a$ = InputBox(bilgi, "YAZDIRMA ALANINI SEÇME", düğme)
ActiveSheet.PageSetup.PrintArea = Selection.Address
ActiveWindow.SelectedSheets.PrintPreview
Range("A13").Select
End Sub

Burada A2 ie B30 ve E2 ile F30 arası yazılsın istiyorum. C ve D sütunu yazılmayacak .Böyle olduğu zaman A2 ile B30 u ayrı sayfaya E2 ile F30 u da başka sayfaya çıktı veriyor. İstiyorum ki ikisi bir sayfada C ve D sutunları yerine E ve F stunu yazdırırken Ave b sütunları ile birleşsin.
Umarım derdimi anlamışsınızdır. Þimdiden Çok teşekkür ederim.
Bu arada tavsiye edebileceğiniz Excel kitabı varsa yazarsanız çok sevinirim
---iyi çalışmalar-----------

 

[Serpily]

C ve D sütunlarını yazdırırken gizleyip

Columns("C").Select
Selection.EntireColumn.Hidden = True

yazdırma işlemi bitince de göstersek olur mu?

 

[heyredkit]

Çok teşekkürler