通过


KeyBinding.Rebind 方法 (Word)

更改分配给指定的组合键的命令。

语法

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

另请参阅

KeyBinding 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。