MoveStartUntil 方法

移动指定区域或所选内容的开始位置，直到在文档中找到任何指定的字符。如果在文档中是向后移动，则扩展区域或所选内容。

说明

本方法将指定区域或所选内容开始位置的移动字符数以 Long 类型返回。如果 Count 大于 0，则该方法返回移动的字符数加 1。如果 Count 小于 0，则该方法返回移动的字符数减 1。如果未发现 Cset 字符，则不改变指定区域或所选内容，并返回 0。如果开始位置移动至结束位置后的位置，则折叠指定区域或选定内容，同时移动开始和结束位置。

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

Cset   Variant 类型，必需。一个或多个字符。该参数区分大小写。

Count   Variant 类型，可选。指定区域或所选内容移动的最大字符数。可以取一个数值，也可取 wdForward 或 wdBackward 常量之一。如果 Count 是正数，则区域或所选内容在文档中向前移动。如果 Count 是负数，则区域或所选内容向后移动。默认值为 wdForward。

示例

本示例在文档中向后扩展所选内容，直到找到字母“I”。

Selection.MoveStartUntil Cset:="I", Count:=wdBackward

如果在所选内容的第一段有美元字符 ($)，本示例将 myRange 移到该字符的前面。

Set myRange = Selection.Paragraphs(1).Range
leng = myRange.End - myRange.Start
myRange.Collapse Direction:=wdCollapseStart
myRange.MoveStartUntil Cset:="$", Count:=leng