Page tree

Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

No Format
Sub Workbook_Open()

  With Application
    .OnKey "{F1}", "Your_Macro_Name"
    .OnKey "{F2}", "Your_Macro_Name"
  End With

End Sub

Sub Workbook_BeforeClose(Cancel As Boolean)

  With Application
    .OnKey "{F1}" 'Clears the setting on close
    .OnKey "{F2}"
  End With

End Sub

Note: F# do have functions so better to use CTRL+SHIFT+{LETTER} Eg: Use this Module to test CTRL+SHIFT+S

No Format
Public Sub SetKey() 
Application.OnKey "^+S", "Test" 
End Sub

Public Sub Test()
 MsgBox "Testing"
End Sub



This only works for Microsoft Word (I'd Rec using the above code, but I'm posting for reference)

...