Makroya Kısayol Atama Hk.

[bsen]

Aşağıdaki makroyu yazıp kaydettim. Fakat kısayol atamak istediğimde (Ã?rneğin Ctrl + Ç gibi) bunu yerine getirmiyor. Ctrl + Ç'ye bastığımda herhangi bir değişklik olmuyor. Çözümü nedir??

Tşk.

Const shrdnomrustring = &H2
Private Declare Function SHRunDialog Lib "shell32" Alias "#61" (ByVal hOwner As Long, ByVal Unknown1 As Long, ByVal unknown2 As Long, ByVal sztitle As String, ByVal szprompt As String, ByVal uflags As Long) As Long
Sub run_komutu()
SHRunDialog hwnd, 0, 0, "program çalıştır ...", "calistir ...", 0
End Sub

 

[Levent Menteşoğlu]

Aşağıdaki kodları deneyin. Kod içindeki "calistir" çalışmasını istediğiniz makronun adıdır.

Sub auto_open()
Application.OnKey "^{ç}", "calistir"
End Sub
 
Sub auto_close()
Application.OnKey "^{ç}"
End Sub

 

[dbicer83]

Makrolar yardımıyla çalışma kitabındaki sayfalara kısayol atamak yapılabirmi örnek ;
alt+a _sayfa1 alt+b sayfa2 gibi olabilir mi?

 

[dbicer83]

Makrolar yardımıyla çalışma kitabındaki sayfalara kısayol atamak yapılabirmi örnek ;
alt+a _sayfa1 alt+b sayfa2 gibi olabilir mi?

Soru pek anlaşılmıdamı acaba yoksa bu şekil bişi yapılmaza mı acaba?
teşekkürler.

 

[dbicer83]

Aşağıdaki kodları deneyin. Kod içindeki "calistir" çalışmasını istediğiniz makronun adıdır.

Sub auto_open()
Application.OnKey "^{ç}", "calistir"
End Sub
 
Sub auto_close()
Application.OnKey "^{ç}"
End Sub

buradaki örneğe ek dosya olarak eklebilirmiyiz yapamıyorum. bir değilde 3-4 adet kısayoldan oluşursa eğer çalıştıramadım çünkü teşekkürler.

 

[çalışkannn]

merhaba paste specail/value komutuna nasıl kısa yol atıyabilirim