Macroya tuş fonksiyonları ekleme?

[nackifer]

Merhaba arkadaşlar butonlara tuş fonksiyonu ekyelebiliyormuyuz mesela macronun bulunduğu sayfayı açtığımda F1 tuşuna basınca macro açılsın tekrar F1 tusuna bastığımda (macro açık olduğu zaman) yazdığım bilgileri kaydetsin yani kaydet butonuna bassın işim bitincede esc tusuna bastığımda macro kapansın tuş fonksiyonu nasıl ekliyoruz ?

 

[mancubus]

aşağıdaki gibi bir mantık yürütülebilir.

bu makro çalıştırıldığında "deneme makrosu" F4 tuşuna atanır:

Sub atama()
Application.OnKey "{F4}", "deneme"
End Sub

deneme makrosu:

Sub deneme()
MsgBox "denemedir"
End Sub

bu makro çalıştırıldığında F4 tuşuna atama iptal olur:

Sub atama_iptal()
Application.OnKey "{F4}", ""
End Sub

 

[nackifer]

Eyvallah arkadaşım ellerin dert görmesin

 

[mancubus]

rica ederim.
OnKey metodu ile ilgili detay bilgi için:
http://msdn.microsoft.com/en-us/library/aa195807(v=office.11).aspx