CommandParameter Property Example

This example assigns a shortcut key to the FontSize command, with a command parameter of 8. Use the CommandParameter property to display the command parameter along with the command name and key string.

Set aKey = KeyBindings.Add(KeyCategory:=wdKeyCategoryCommand, _
    Command:="FontSize", _
    KeyCode:=BuildKeyCode(wdKeyControl, wdKeyAlt, wdKeyS), _
    CommandParameter:="8")
MsgBox aKey.Command & Chr$(32) & aKey.CommandParameter _
    & vbCr & aKey.KeyString