Returns the shortcut key or sets it.

Type Info:

 
Shortcut As String
Example: 
Dim Dlg As DotNetShortcutDialog
Dim Shortcut As String

Set Dlg = Application.Tools.RestypeEditors.DotNetShortcutDialog

Dlg.Shortcut = "CtrlA"
If (Dlg.Show) Then
    Shortcut = Dlg.Shortcut
End If
See also:

Class DotNetShortcutDialog
Last Updated: 04/26/05