Hi Anne,
FYI I found this in the help for the Rebind command
This sets the shortcut Ctrl-Shift-5 to the macro documentSetup located in
the module1 module.
CustomizationContext = ActiveDocument
Set myKey = FindKey(BuildKeyCode(wdKeyControl, wdKeyShift, wdKey5))
myKey.Rebind KeyCategory:=wdKeyCategoryCommand,
Command:="module1.documentSetup"
Regards
Bo
> While not exactly the same, it's very similar to this:
http://www.officearticles.com/misc/methods_to_run_a_macro_in_microsoft_office_ap
plications.htm
> ************
> Anne Troy
[quoted text clipped - 6 lines]
> > Regards
> > Bo Rasmussen