共用方式為


PowerPoint) (Shapes.AddTextbox 方法

會建立文字方塊。 傳回 Shape 物件,該物件代表新的文字方塊。

語法

expressionAddTextbox( _Orientation_, _Left_, _Top_, _Width_, _Height_ )

expression 代表 Shapes 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Orientation 必要 MsoTextOrientation 文字方向。 這些常數的一些可能無法使用,視您所選取或安裝的語言支援 (例如 US English) 而定。
Left 必要 Single 相對於投影片左緣,以點為單位指定文字方塊左緣的位置。
Top 必要 Single 相對於投影片上緣,以點為單位指定文字方塊上緣的位置。
Width 必要 Single 以點為單位指定文字方塊的寬度。
Height 必要 Single 以點為單位指定文字方塊的高度。

傳回值

圖形

範例

本範例會在 myDocument 中新增一個含有文字 "Test Box" 的文字方塊。

Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes.AddTextbox(Orientation:=msoTextOrientationHorizontal, _ 
    Left:=100, Top:=100, Width:=200, Height:=50).TextFrame _ 
    .TextRange.Text = "Test Box"

另請參閱

Shapes 物件

支援和意見反應

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