2017-06-19 1 views
2

F1キーを 'excel help'ではなくexcelのマクロに割り当てるにはどうすればよいですか?この質問には多くの回答がありますが、2013/2016にはうまくいきません。マクロを実行するためのF1キー

私はこのようなソリューションを必要としますが、新しいExcel用:助けを事前に https://www.extendoffice.com/documents/excel/1798-excel-disable-f1-key.html https://excel.tips.net/T002089_Disabling_the_F1_Key.html

感謝。

答えて

5
Public Sub TestMe() 

    Application.OnKey "{F1}", "RunMe" 

End Sub 

Public Sub UnTestMe() 

    Application.OnKey "{F1}" 

End Sub 


Public Sub RunMe() 

    Debug.Print Now 

End Sub 

あなたがTestMeを実行する場合、それはRunMeF1を割り当てます。割り当てを解除するには、UnTestMeを実行してください。

Application.OnKey "^{F1}", "F1_CtrlMacro" 
Application.OnKey "%{F1}", "F1_AltMacro" 
Application.OnKey "+{F1}", "F1_ShiftMacro" 
Application.OnKey "{F1}", "F1_OnlyMacro" 

編集:

以下を追加し、最初からそれを割り当てるには一般的に、あなたはこのようなCtrlキーShiftキーまたはAltキーF1を使用して検討することThisWorkbookenter image description here

設定された現在のキーストロークを無効にするには
+0

をお持ちのマクロを実行する必要がなく、それを割り当てる方法はありますか? Excelを起動するだけで、最初からF1の下にあります。 – NoOne

+1

@NoOne - 編集を参照してください。 – Vityata

+0

いいことは、ちょうど私がテストしたように、これはセッション特有で、 'Workbook_BeforeClose'でそれを削除する必要はありません:)。あなたは確認しますか? –

2

にあなたがここに

Public Sub RunMyMacro() 

    Application.OnKey "{F1}", "RunMyCode" 

End Sub 

を作ったマクロにそれを割り当てるには、次にVBAコード

Sub disableF1() 
Application.OnKey "{F1}", "" 
End Sub 

次F1

使用は例です実行するマクロ:

Public Sub RunMyCode 

    MsgBox "This is my macro to run!" 

End Sub 

は素敵な一日

よろしくダニエル

関連する問題