Soru Gizlenmiş Sekmeleri yazdırma Butonu

ekremmk

Altın Üye
Katılım
21 Kasım 2018
Mesajlar
120
Beğeniler
10
Excel Vers. ve Dili
Excel 2013 , Türkçe
#1
İyi akşamlar öncelikle çalışmamda başka excel dosyalarına bilgi aktarıp daha sonra o dosyaları yazdır butonu yaparak excel dosyamın boyutunu düşük tutmayı düşünmüştüm ancak veri aktardığım dosyayı açmadan güncel hale gelmesi mümkün değil sanırım.
En azından görünmesini istemediğim dosyaları gizli yaparak o sayfaları yazdıracak buton yapmaya çalışıyorum. Mümkün müdür aceba gizli sekmeleri yazdırabilmek?
 

turist

Destek Ekibi
Destek Ekibi
Katılım
18 Kasım 2009
Mesajlar
5,100
Beğeniler
534
Excel Vers. ve Dili
2013 64Bit
English
#2
Mümkündür, ancak; Örnek Excel dosyanızı ekleyip dosya üzerinde açıklama yaparsanız, daha hızlı ve doğru cevaplar bulabilirsiniz.
 

turist

Destek Ekibi
Destek Ekibi
Katılım
18 Kasım 2009
Mesajlar
5,100
Beğeniler
534
Excel Vers. ve Dili
2013 64Bit
English
#4
Aşağıdaki kodları kullanıp deneyin.
Kod:
Private Sub btnYazdir_Click()
If Me.ComboBox6.Value = "SEÇİNİZ" Then Exit Sub
i = Me.ComboBox6.Value
Sheets(i).Visible = True
Sheets(i).Select
Unload Me
Sheets(i).PrintPreview
Sheets(i).Visible = False
Sheets("USERFORM").Select
End Sub
Private Sub UserForm_Initialize()
    Dim i As Long
    Me.ComboBox6.Clear
    For i = 1 To Sheets.Count
    If Sheets(i).Visible = False Then Me.ComboBox6.AddItem Sheets(i).Name
    Next
Me.ComboBox6.Value = "SEÇİNİZ"
End Sub
 
Üst