Publisher) (TextRange.Characters 方法

會傳回 TextRange 物件，代表指定的文字字元子集。

語法

運算式。開始 (字元、長度)

表達 代表 TextRange 物件的 變數。

參數

名稱	必要/選用	資料類型	描述
Start	必要	Long	傳回之範圍中的第一個字元。
Length	選用	Long	所要傳回字元的數目。 預設值為 1。

傳回值

TextRange

註解

如果 Start 大於指定文字中的字元數，則傳回範圍從指定範圍的最後一個字元開始。

如果 Length 大於從指定起始字元到文字結束之間的字元數，則傳回的範圍中包含這所有字元。

範例

本範例為使用中文件第一頁上的第一個圖案設定文字，然後將前兩個字元的字型設為 15 點粗體。

Sub CharRange() 
 Dim rngCharacters As TextRange 
 Set rngCharacters = Application.ActiveDocument.Pages(1).Shapes(1) _ 
 .TextFrame.TextRange.InsertBefore(NewText:="Hello World.") 
 With rngCharacters.Characters(Start:=1, Length:=2).Font 
 .Size = 15 
 .Bold = msoTrue 
 End With 
End Sub

支援和意見反應

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