Trouble With MacroOptions

[Sprinks]

I'm trying to test setting the macro hotkey programmatically. The first
attempt is trying to remove the hotkey assignment for a macro named
"RoundOnePlace". The following code runs without error, but does not remove
the hotkey assignment.

Public Sub TestMacroAssign()
Application.MacroOptions Macro:="RoundOnePlace", HasShortcutKey:=False
End Sub

Should I discover what I'm doing wrong, I also need to know:
- What values for ShortcutKey correspond to Ctrl-(letter), and
Ctrl-Shft(letter)
- If there is a Macros collection that I can loop through

Thanks.
Sprinks

 

[Bob Phillips]

I get rid of them like this

Application.MacroOptions Macro:="RoundOnePlace", ShortcutKey:=""

They are automatically assigned Ctrl-key, and the SXhift c omes into play if
you use a shifted character, such as A, or :.

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

 

[Sprinks]

Thanks, Bob. That works.

Sprinks

I get rid of them like this

Application.MacroOptions Macro:="RoundOnePlace", ShortcutKey:=""

They are automatically assigned Ctrl-key, and the SXhift c omes into play if
you use a shifted character, such as A, or :.

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)