Dosya-yazdir İptalİ

[masiva80]

ARKADAŞLAR DOSYA MENÜSÜ -YAZDIR KOMUTUNUNUN İPTAL EDİLMESİ GEREKİYOR.

sAYFAYI SADECE MAKRO KODU İLE YAZDIRMAM GEREKİYOR.

DOSYA MENÜSÜNDEKİ YAZDIR KOMUTUNU NASIL İPTAL EDEBİLİRİM.

(TABİ Kİ KOD İLE)

 

[Levent Menteşoğlu]

Aşağıdaki kodu thisworkbook sayfasına kopyalayın.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If deg = False Then Cancel = True
End Sub

Aşağıdaki koduda bir normal modül sayfasına kopyalayın. Bu kod yazdırma işlevini yapacaktır.

Public deg As Boolean
Sub yaz()
deg = True
ActiveSheet.PrintOut
deg = False
End Sub

Userform üzerindeki yazdır butonunada aşağıdaki kodu kopyalayın.

Private Sub CommandButton1_Click()
yaz
End Sub

 

[masiva80]

cevap

teşekkürler işe yarıyor