UserForm Üzerinden Yazdırma

Katılım
7 Temmuz 2007
Mesajlar
111
Excel Vers. ve Dili
Office 2003 Tr
Evet arkadaşlar userform üzerinden veri aratıp listboxt ta sıralanan veriyi seçerek o verinin olduğu sayfayı nasıl yazdırabiliriz... Turkuazla işaretli olan alanı yazdırmak istiyorum... Yardım edebilirmisin??
 

Orion1

Uzman
Uzman
Katılım
1 Mart 2005
Mesajlar
22,254
Excel Vers. ve Dili
Win7 Home Basic TR 64 Bit

Ofis-2010-TR 32 Bit
Merhaba.
İstediğiniz sayfa listbox'tan seçerek yazdırılabiliyor.Yazdır Butonuna basıyorsunuz.:cool:
Ekli dosyayı incleyiniz.:cool:
Kod:
Private Sub CommandButton2_Click()
If ListBox1.ListIndex < 0 Then Exit Sub
    Sheets(ListBox1.Column(0)).Select
    [A1].Select
    ActiveSheet.PageSetup.PrintArea = "A1:K62"
    ActiveSheet.PageSetup.Zoom = 85
    ActiveSheet.PrintOut Copies:=1
    Unload Me
End Sub
 
Üst