將水平文字插入垂直文字串流,並將新的水平文字作為 Field 物件傳回。
語法
運算式。AddHorizontalInVertical (範圍, 文字)
運算式 代表 Fields 物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| Range | 必要 | TextRange | 要插入水平文字的文字範圍。 |
| Text | 必要 | String | 要水平插入的文字。 |
傳回值
欄位
範例
此範例會在使用中出版物的第一頁上,在現有垂直文字之後水平插入文字 Horizontal Test。
Dim rngTemp As TextRange
Dim fldTemp As Field
With ActiveDocument.Pages(1).Shapes(1)
Set rngTemp = .TextFrame.TextRange.InsertAfter("")
Set fldTemp = .TextFrame.TextRange.Fields _
.AddHorizontalInVertical(Range:=rngTemp, Text:="Horizontal Test")
End With
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。