Word VBA教程:PortraitFontNames属性

返回一个FontNames对象,该对象包括所有有效纵向字体的名称。

expression.PortraitFontNames

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

VBA示例

本示例在插入点插入一组纵向字体。


For Each aFont In PortraitFontNames
    With Selection
        .Collapse Direction:=wdCollapseEnd
        .InsertAfter aFont
        .InsertParagraphAfter
        .Collapse Direction:=wdCollapseEnd
    End With
Next aFont

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号