Word VBA教程:TabPosition属性

该属性返回或设置用于指定的ListLevel对象的制表符位置。Single 类型,可读写。

expression.TabPosition

expression   必需。该表达式返回一个 ListLevel对象。

VBA示例

本示例设置每一列表级别的编号,以使其从前一级别缩进 0.5 英寸(36 磅),制表符设于编号之后 0.25 英寸(18 磅)处。


r = 0
For Each lev In ListGalleries(wdOutlineNumberGallery) _
    .ListTemplates(1).ListLevels
        lev.Alignment = wdListLevelAlignLeft
        lev.NumberPosition = r
        lev.TrailingCharacter = wdTrailingTab
        lev.TabPosition = r + 18
        r = r + 36
Next lev

本示例将第一个编号列表模板赋给变量myltemp,并将制表符位置设于 1 英寸处。然后将列表模板应用于所选内容。


Set myltemp = ListGalleries(wdNumberGallery).ListTemplates(1)
myltemp.ListLevels(1).TabPosition = InchesToPoints(1)
Selection.Range.ListFormat.ApplyListTemplate ListTemplate:=myltemp

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号