kalfalık-ustalık sınav programım

[geceex]

Bilgi girişi sayfasından girdiğim bilgiler Baş.Bit., Sarf Tut., NotÇiz.1, Zarf, sayfalarına otomatik atılıyor

Bu sayfaları alt çubukta da görünmeden BİLGİ GİRİŞİ sayfasından komut vererek yazdırmak istiyorum.

Bu konuda yardımlarınızı rica ediyorum.

Kendim ve arkadaşlarımın adına yardımları dokunan arkadaşlara ve excel formu kurucularına selam ve saygılarımı sunuyorum

 

[N.Ziya Hiçdurmaz]

yanıt

Private Sub CommandButton1_Click()
Unload Me
sayfa = ComboBox1
Sheets(sayfa).PrintOut
Sayfa1.Activate
End Sub
Private Sub UserForm_Initialize()
    For i = 2 To Sheets.Count
        ComboBox1.AddItem Sheets(i).Name
    Next
End Sub

 

[geceex]

Yardımlarınıza teşekkürler. Selam ve saygılarımı sunuyorum.