共用方式為


Word) (Selection.Move 方法

將指定的選取範圍摺疊至開始或結束位置,然後依照指定的單位數目移動摺疊的物件。 此方法會傳回 Long 值,代表所選取項目已移動或會傳回 0 (零) 如果移動不成功的單位數目。

語法

expressionMove( _Unit_ , _Count_ )

需要 expression。 代表 Selection 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Unit 選用 WdUnits 移動結束字元位置時所使用的單位。
Count 選用 Variant 所指定的範圍或選取範圍是要移動的單位數目。 如果 Count 是正值,物件會摺疊到其結束位置和文件中往回移動所指定的單位數目。 如果 Count 是負數,物件會回到其開始位置摺疊,向前移動指定的單位數目。 預設值為 1。 您也可以使用 Move 方法之前使用 摺疊 方法來控制摺疊方向。 如果範圍或選取範圍是中間單位或是未摺疊,將其移至的開頭或結尾單位的算作將它移一個完整的單位。

傳回值

Long

註解

摺疊範圍或選取範圍的開始位置與結束位置相同。

套用至某個範圍的 Move 方法不會重新排列文件中的文字。 而加以重新定義要參照至文件中的新位置的範圍。

如果您將 Move 方法套用至 Range 物件變數 (例如 Selection.Paragraphs(3).Range.Move) 以外的任何範圍,則此方法無效。

移動 Selection 物件摺疊選取項目並將插入點向前或文件中往回移動。

範例

這個範例會將選取範圍向右移動兩個單字,並將插入點放置在第二個單字字尾空白之後的位置。 如果移動不成功,則會顯示訊息方塊,指出選取範圍位於文件的結尾。

If Selection.StoryType = wdMainTextStory Then 
 wUnits = Selection.Move(Unit:=wdWord, Count:=2) 
 If wUnits < 2 Then _ 
 MsgBox "Selection is at the end of the document" 
End If

這個範例會將表格中的選取範圍向前移動三個儲存格。

If Selection.Information(wdWithInTable) = True Then 
 Selection.Move Unit:=wdCell, Count:=3 
End If

另請參閱

Selection 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應