Word VBA教程:StartOf方法

将指定的区域或选定内容的开始位置移动或扩展至最近的指定文字单位的开头。本方法返回 Long 类型的值表明了区域或选定内容移动或扩展的字符数。如果是在文档中向后移动,则本方法返回负数。

expression.StartOf(Unit, Extend)

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

Unit   WdUnits,可选。指定区域或选定内容的起始位置的移动单位。

WdUnits 可以是下列 WdUnits 常量之一:
wdCell
wdCharacter
wdColumn
wdParagraph
wdRow
wdSection
wdSentence
wdStory
wdTable
wdWord
如果 expression 返回 Selection对象,则也可以使用 wdLine。默认值为 wdWord。

Extend   WdMovement,可选。

WdMovementType 可以是下列 WdMovementType 常量之一:
wdMove
wdExtend
如果使用了 wdMove,则该区域或选定内容的末尾都移至指定单位的开头;如果使用了 wdExtend,则该区域或选定内容的开始扩展到指定单位的开头。默认值为 wdMove。

说明

如果指定区域或选定内容的开始已经位于指定单位的开始,则本方法不移动或扩展区域或选定内容。例如,如果选定内容位于一行的开头,则下面的示例返回 0(零),并且不改变选定内容。


char = Selection.StartOf(Unit:=wdLine, Extend:=wdMove)

VBA示例

本示选定从插入点至该行开始之间的文本。选定字符数保存在charmoved 中。


Selection.Collapse Direction:=wdCollapseStart charmoved = Selection.StartOf(Unit:=wdLine, Extend:=wdExtend)

本示例将选定内容移至段落的开头。


Selection.StartOf Unit:=wdParagraph, Extend:=wdMove

本示例将myRange 移至文档第二句的开头(折叠myRange,并放在第二句的开头)。本示例使用 Select方法来表明myRange 的位置。


Set myRange = ActiveDocument.Sentences(2)
myRange.StartOf Unit:=wdSentence, Extend:=wdMove
myRange.Select

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号