更改分配给指定的组合键的命令。
语法
expression.
Rebind( _KeyCategory_ , _Command_ , _CommandParameter_ )
expression 是必需的。 一个代表“KeyBinding”对象的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| KeyCategory | 必需 | WdKeyCategory | 指定组合键的键类别。 |
| 命令 | 必需 | String | 指定命令的名称。 |
| CommandParameter | 可选 | Variant | Command 所指定的命令所需的附加文字(如果有)。 有关此参数的值的信息,请参阅 Add 方法。 |
示例
本示例将 Ctrl+Shift+S 组合键重新分配给“FileSaveAs”命令。
Dim kbTemp As KeyBinding
CustomizationContext = NormalTemplate
Set kbTemp = _
FindKey(BuildKeyCode(wdKeyControl, wdKeyShift, wdKeyS))
kbTemp.Rebind KeyCategory:=wdKeyCategoryCommand, _
Command:="FileSaveAs"
本示例将所有分配给宏“Macro1”的键重新分配给宏“ReportMacro”。
Dim kbLoop As KeyBinding
CustomizationContext = ActiveDocument.AttachedTemplate
For Each kbLoop In _
KeysBoundTo(KeyCategory:=wdKeyCategoryMacro, _
Command:="Macro1")
kbLoop.Rebind KeyCategory:=wdKeyCategoryMacro, _
Command:="ReportMacro"
Next kbLoop
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。