Publisher) (TextRange.MoveEnd 方法

會移動範圍的結束字元位置。 這個方法會傳回 Long 來代表範圍或選取範圍實際移動的單位數;如果移動失敗，則傳回 0 (0) 。

語法

運算式。MoveEnd (單位、 大小)

運算式 代表 TextRange 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Unit 必要 PbTextUnit 摺疊的範圍或選取範圍採用的移動單位。 可以是 Microsoft Publisher 型別程式庫中宣告的其中一個 PbTextUnit 常數。
大小 必要 Long 要移動的單位數。 如果此數字為正數，則會在文件中向前移動結束字元位置。 如果此數字為負數，則向後移動末端。 如果結束位置超過起始位置，範圍就會折疊，兩個字元位置會一起移動。

傳回值

Long

範例

本範例會設定一個文字範圍，移動範圍的起始和結束字元位置，然後格式化整個範圍的字型。

Sub MoveStartEnd() 
 Dim rngText As TextRange 
 
 Set rngText = ActiveDocument.Pages(1).Shapes(1).TextFrame _ 
 .TextRange.Paragraphs(Start:=3, Length:=1) 
 
 With rngText 
 .MoveStart Unit:=pbTextUnitLine, Size:=-2 
 .MoveEnd Unit:=pbTextUnitLine, Size:=1 
 With .Font 
 .Bold = msoTrue 
 .Size = 15 
 End With 
 End With 
 
End Sub

支援和意見反應

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

  • 上次更新時間：