• DİKKAT

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

excelde gizli sayfaları yazdırmak

  • Konbuyu başlatan Konbuyu başlatan tosman
  • Başlangıç tarihi Başlangıç tarihi
Katılım
10 Ocak 2012
Mesajlar
8
Excel Vers. ve Dili
2007/2010 türkçe
excel çalışma kitabında sayfa1 oluşturduğum düğmeye gizli olan sayfa2 yazdırmak için nasıl bir makro atamalıyım veya makrosuna nasıl bir kod yazmalıyım yardımlarınız için şimdiden teşekkürler
 
excel çalışma kitabında sayfa1 oluşturduğum düğmeye gizli olan sayfa2 yazdırmak için nasıl bir makro atamalıyım veya makrosuna nasıl bir kod yazmalıyım yardımlarınız için şimdiden teşekkürler

Merhaba
Boş bir module kopyalayın ve deneyin.
Kod:
Option Explicit
Sub gizli_sayfa_yazdır_1967()
'Konu       :   Gizli Sayfa Yazdır
'Mail       :   m.batu.1967@gmail.com
'Msn        :   m.batu.1967@hotmail.com.tr
'Coder By   :   asi_kral_1967
Dim asi As Worksheet
Set asi = Sheets("Sayfa2")
Application.ScreenUpdating = False
asi.Visible = True
asi.PrintOut
asi.Visible = False
Application.ScreenUpdating = True
MsgBox "İşlem Tamamlandı", vbInformation, "asi_kral_1967"
End Sub
Dosyanız Ekte
 

Ekli dosyalar

Geri
Üst