Word VBA教程:KeyCategory属性

返回分配给指定组合键的项目类型。WdKeyCategory,只读。

WdKeyCategory 可以是下列 WdKeyCategory 常量之一:
wdKeyCategoryAutoText
wdKeyCategoryCommand
wdKeyCategoryDisable
wdKeyCategoryFont
wdKeyCategoryMacro
wdKeyCategoryNil
wdKeyCategoryPrefix
wdKeyCategoryStyle
wdKeyCategorySymbol

expression.KeyCategory

expression   必需。该表达式返回“应用于”列表中的一个对象。

VBA示例

本示例显示分配给字体名称的按键。如果尚未给字体分配按键,则显示一条消息。


Dim kbLoop As KeyBinding
Dim intCount As Integer
intCount = 0
For Each kbLoop In KeyBindings
    If kbLoop.KeyCategory = wdKeyCategoryFont Then
        intCount = intCount + 1
        MsgBox kbLoop.Command & vbCr & kbLoop.KeyString
    End If
Next kbLoop
If intCount = 0 Then _
    MsgBox "Keys haven't been assigned to fonts"

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号