Onkey problemi

[mamita]

Merhabalar,
Aşağıdaki kodu oluşturduğumda arka planda bulunan diğer çalışma kitaplarını da CTRL+P tuşuyla yazdırmamı engelliyor Bu kodu sadece bir çalışma kitabı için aktive etmenin yöntemi var mıdır
Public Sub Workbook_Activate()
Application.OnKey "^{p}", ""
End Sub

 

[hamitcan]

Public ifadesini Private olarak değiştirip dener misiniz ?

 

[mamita]

Denemiştim sanırım hocam, bir daha deneyeyim yarın Katkınız için teşekkür ederim

 

[Haluk]

"Application" nesnesi bütün Excel uygulamaları için geçerli olduğundan, yapılacak tek şey; kodun olduğu dosyanın Workbook_Deactivate() yordamına kullandığınız OnKey metoduyla pasif hale getirdiğiniz CTRL+P tuşlamasını orjinal durumuna getirmek üzere reset'leyecek kodu yazmanız gerekir.

Bu şekilde, başka bir Excel dosyası aktif olduğunda o zaman CTRL+P orjinal görevini görür....

.

 

[mamita]

Desteğiniz icin teşekkür ederim application hakkında verdiginiz katkılarınızdan dolayı ayrıca teşekkür ederim Yarın deneyecegım

 

[mamita]

"Application" nesnesi bütün Excel uygulamaları için geçerli olduğundan, yapılacak tek şey; kodun olduğu dosyanın Workbook_Deactivate() yordamına kullandığınız OnKey metoduyla pasif hale getirdiğiniz CTRL+P tuşlamasını orjinal durumuna getirmek üzere reset'leyecek kodu yazmanız gerekir.

Bu şekilde, başka bir Excel dosyası aktif olduğunda o zaman CTRL+P orjinal görevini görür....

.

Saygıdeğer Haluk hocam, çok teşekkür ederim Gayet güzel çalışıyor Olayı daha iyi kavramak adına yeni sorumu da sizinle paylaşmak isterim Workbook_Deactivate() yordamında da application kodu yazıyorum bütün excel dosyaları için geçerli olması gerekmiyor muydu

 

[Haluk]

Zaten o sayede probleminiz çözüldü...... "Deactivate" olayı gerçekleştiği anda, "Application" nesnesine CTRL+P tuş kombinasyonun asli görevini icra etmeye başlayacağını bildiriyorsunuz.

.

 

[mamita]

Deactive koduyla yapmaya çalıştığınız kısmı anladım hocam Asıl kafama takılan kısım kodu yazdığım workbookta nasıl kısayol kombinasyonu çalışmıyor sonuçta deaktive yordamındaki kodla tekrardan çalışır duruma getirmiştik

 

[mamita]

Ve ya hiç yormayın kendinizi hocam elinize sağlık