Baskı Önizlemedeki Yazdır Butonunu Kaldırma

[ahmed_ummu]

Merhaba arkaşlar.

Excel sayfasını önizleme yaparken yazdır butonunu kaldırma makrosu var mıdır. Yani baskı önizleme yaparken oradan yazdır seçilmeyecek. İnternette benze kodlar buldum ama tam istediğimi yapamadım.

Yardımcı olursanız sevinirim.

 

[Greenblacksea53]

Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Application.CommandBars("Print Preview").Controls("Print...").Enabled = False
End Sub

Dosyanızı açın ve "Alt + F11" tuşlarına basarak VBA Editor'ü açın. "ThisWorkbook" altındaki "Workbook" bölümüne gidin ve "BeforePrint" olayını seçin. Ardından, kodu yapıştırın.

Bu kod, sayfa baskıya hazır hale geldiğinde, "Yazdır" butonunun gri renkte olmasını sağlayacak ve tıklanamaz hale getirecektir. Bu sayede, kullanıcılar baskı önizlemesi modunda iken yanlışlıkla "Yazdır" butonuna tıklamayacaklar.

 

[ahmed_ummu]

Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Application.CommandBars("Print Preview").Controls("Print...").Enabled = False
End Sub

Dosyanızı açın ve "Alt + F11" tuşlarına basarak VBA Editor'ü açın. "ThisWorkbook" altındaki "Workbook" bölümüne gidin ve "BeforePrint" olayını seçin. Ardından, kodu yapıştırın.

Bu kod, sayfa baskıya hazır hale geldiğinde, "Yazdır" butonunun gri renkte olmasını sağlayacak ve tıklanamaz hale getirecektir. Bu sayede, kullanıcılar baskı önizlemesi modunda iken yanlışlıkla "Yazdır" butonuna tıklamayacaklar.

Çok teşekkürler sayın Greenblacksea53 ekte gönderdiğim gibi bir hata verdi.