• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Buton ile yazdırma

hatirlabeni

Altın Üye
Katılım
14 Ekim 2011
Mesajlar
207
Excel Vers. ve Dili
Excel Vers. ve Dili Ofis 2016 TR 32 Bit
Arkadaslar benim yapmak istedigim 6 excel çalışma sayfam var hazır
Sayfa isimleri
Öğrenci1
Öğrenci2
Öğrenci3
Öğrenci4
Öğrenci5
Öğrenci6

Ayrı Bir Sayfaya da YazdırmaSayfası eklemek istiyorum ve bu sayfaya da butonlarla yazdırmak istedigim ögrenciilerin her birini bir butona koymak istiyorum

1. botun da Öğrenci1 2. sinde Öğrenci2 yazdır olacak bunu nasıl yapabiliriz.
 
dosya eklermisiniz.
 
kontrol edermisiniz?
 

Ekli dosyalar

Aynen boyle olacak fakat onizleme olmadan butona tıklandıgı zamam otomatik yazdırsın yapılabilir mi ?
 
kodladı aşağıdakilerle değiştirip denermisiniz.

Private Sub CommandButton1_Click()
Sheets("öğrenci1").PrintOut
End Sub

Private Sub CommandButton2_Click()
Sheets("öğrenci2").PrintOut
End Sub

Private Sub CommandButton3_Click()
Sheets("öğrenci3").PrintOut
End Sub

Private Sub CommandButton4_Click()
Sheets("öğrenci4").PrintOut
End Sub

Private Sub CommandButton5_Click()
Sheets("öğrenci5").PrintOut
End Sub

Private Sub CommandButton6_Click()
Sheets("öğrenci6").PrintOut
End Sub
 
Bu şekilde kullanabilirsiniz.
Kod:
Private Sub ListBox1_Click()
On Error Resume Next
Sheets("" & ListBox1).PrintOut
End Sub
 

Ekli dosyalar

kodladı aşağıdakilerle değiştirip denermisiniz.

Private Sub CommandButton1_Click()
Sheets("öğrenci1").PrintOut
End Sub

Private Sub CommandButton2_Click()
Sheets("öğrenci2").PrintOut
End Sub

Private Sub CommandButton3_Click()
Sheets("öğrenci3").PrintOut
End Sub

Private Sub CommandButton4_Click()
Sheets("öğrenci4").PrintOut
End Sub

Private Sub CommandButton5_Click()
Sheets("öğrenci5").PrintOut
End Sub

Private Sub CommandButton6_Click()
Sheets("öğrenci6").PrintOut
End Sub


Hocam tam istediğim sekilde oldu Seyit Hocamın dosyasını da inceedim fakat diğer kodlar daha kullanışlı kendi çalışma sayfama aynısını nasıl eklerim taşı ve kopyala ile olmadi.
CommandButton nasıl eklerim office sürümüm 2007
 
kendi dosyanızda tuşları yerleştirdikten sonra kodları da kopyalayın olur.
 
Geri
Üst