Hızlı yazdırı engellemek

[ASLAN7410]

Merhaba üstadlarım hayırlı geceler.

Ekte gönderdiğim excel sayfasındaki kodu forumdaki arkadaşlar yazmıştı, bu kodu kullanıyorum gayet güzel çalışıyor.

Aynı kodu başka bir çalışma sayfama ekledim, bu kod sadece ana sayfada çalışıyor, diğer sayfalarda çalışmıyor, ana sayfadada yazı olduğundan ana sayfadaki yazıyıda yazdırmak istediğimde sayfaya eklemiş olduğum yazdır butonunuda iptal ediyor.

Benim istediğim tüm çalışma sayfasında Ctrl+P ve hızlı yazdırı iptal etmek ve sadece sayfaya eklemiş olduğum butonla yazdırmak istiyorum.

Yardım edecek arkadaşlara şimdiden çok teşekkür ediyorum.

 

[ÖmerBey]

Merhaba,
Tam anladım mı bilemiyorum ama eki deneyiniz...
İyi çalışmalar...

 

[ASLAN7410]

Sayın Mucit çok teşekkür ederim, tam istediğim gibi olmuş, ellerinize sağlık.

Küçük bir eklenti daha olursa daha güzel olabilir diye düşünüyorum.
Ctrl+P'ye bastığımda yazdır kısmına geçiyor, bunuda engelleyebilir miyiz?

 

[ÖmerBey]

Modül içerisine aşağıdaki kodları ilave ediniz.
Dosyanızı kaydedin, kapatıp yeniden açıp deneyiniz.

Sub Auto_Open()
Application.OnKey "^{p}", "iptal"
End Sub
Sub iptal()
MsgBox "Sayfa Üzerindeki Yazdır Butonunu Kullanın...", vbCritical
End Sub

Bu arada profilinizde 2007 kullandığınızı belitmişsiniz, eğer versiyon değiştirmişseniz profilinizi düzenlemenizi tavsiye ederim. İyi çalışmalar...

 

[ASLAN7410]

Sayın Mucit çok teşekkür ederim, tam istediğim gibi oldu, Allah razı olsun.

Hayırlı akşamlar hayırlı çalışmalar.