KeyBinding.KeyCode2 Property (Word)
Returns a unique number for the second key in the specified key binding. Read-only Long.
Syntax
expression .KeyCode2
expression An expression that returns a KeyBinding object.
Example
This example displays the key codes of each key in the KeyBindings collection (the collection of all the customized keys in the active document).
Dim aKey As KeyBinding
CustomizationContext = ActiveDocument
For Each aKey In KeyBindings
If aKey.KeyCode2 <> wdNoKey Then
MsgBox aKey.KeyString & vbCr _
& "KeyCode1 = " & aKey.KeyCode & vbCr _
& "KeyCode2 = " & aKey.KeyCode2
Else
MsgBox aKey.KeyString & vbCr _
& "KeyCode1 = " & aKey.KeyCode
End If
Next aKey