Word) (Application.KeysBoundTo 屬性
會傳回一個代表指定給指定項目之所有組合鍵的 KeysBoundTo 物件。
語法
expression。 KeysBoundTo( _KeyCategory_ , _Command_ , _CommandParameter_ )
expression 代表 Application 物件的變數。 選用。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| KeyCategory | 必要 | WdKeyCategory | 組合鍵的類別。 |
| Command | 必要 | String | 命令的名稱。 |
| CommandParameter | 選用 | Variant | 其他文字，如果有的話，所需的命令所指定的命令。 如需詳細資訊，請參閱 「 備註 」 一節的 KeyBindings 物件的 Add 方法中。 |
範例
本範例會示範使用中文件附加之範本內所有指定給 FileOpen 命令的組合鍵。
Dim kbLoop As KeyBinding
Dim strOutput As String
CustomizationContext = ActiveDocument.AttachedTemplate
For Each kbLoop In _
KeysBoundTo(KeyCategory:=wdKeyCategoryCommand, _
Command:="FileOpen")
strOutput = strOutput & kbLoop.KeyString & vbCr
Next kbLoop
MsgBox strOutput
本範例會從 Normal 範本的 Macro1 移除所有組合鍵。
Dim aKey As KeyBinding
CustomizationContext = NormalTemplate
For Each aKey In _
KeysBoundTo(KeyCategory:=wdKeyCategoryMacro, _
Command:="Macro1")
aKey.Disable
Next aKey
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。