Word) (Selection.MoveEndUntil 方法
會移動指定之選取範圍的結束位置，直到在文件中找到任何指定的字元為止。
語法
expression。 MoveEndUntil( _Cset_ , _Count_ )
需要 expression。 代表 Selection 物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| Cset | 必要 | Variant | 一個或多個字元。 這個引數會區分大小寫。 |
| 數目 | 選用 | Variant | 所指定的選取範圍是要移動的字元數上限。 可以是數字或 Count 或 選取 。 如果 Count 是正值，選取範圍是文件中向前移動。 如果是負數，會向後移動選取項目。 預設值為 正值 。 |
傳回值
Long
註解
此方法會傳回 Long 值，代表指定之選取範圍的結束位置所移動的字元數。 如果計數大於 0 (零)，此方法會傳回移動的字元加上 1 的數字。 如果 Count 小於 0 (零)，這個方法會傳回減 1 之間移動的字元數。 如果找不到任何摺字元，不變更選取範圍並方法會傳回 0 (零)。 如果將結束位置往回移動至原始開始位置之前的位置點，就會將開始位置設定為新的結束位置。
如果文件中的移動方向是向前移動，則選取範圍就會跟著展開。
範例
這個範例會將文件中的選取範圍向前延伸，直到找到字母 "a" 為止。 接著這個範例會將選取範圍再展開一個字元，將字母 "a" 也包含在內。
With Selection
.MoveEndUntil Cset:="a", Count:=wdForward
.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend
End With
這個範例會將文件中的選取範圍向前延伸，直到找到定位點為止。 如果在下面 100 個字元中都找不到定位字元，就不會移動選取範圍。
char = Selection.MoveEndUntil(Cset:=vbTab, Count:=100)
If char = 0 Then StatusBar = "Selection not moved"
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。