次の方法で共有


CanvasShapes.AddTextbox メソッド (Word)

描画キャンバスにテキスト ボックスを追加します。 テキスト ボックスを表す Shape オブジェクトを返します。

構文

AddTextbox (Orientation, Left, Top, Width, Height)

expression 必須です。 CanvasShapes オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
Orientation 必須 MsoTextOrientation 文字列の向きを指定します。 可能 の定数のいくつかを選択またはインストールされている言語サポート (たとえば、日本語) によっては使用できないがあります。
Left 必須 単精度浮動小数点型 (Single) テキスト ボックスの左端の位置をポイント数で指定します。
Top 必須 単精度浮動小数点型 (Single) テキスト ボックスの上端の位置をポイント数で指定します。
Width 必須 単精度浮動小数点型 (Single) テキスト ボックスの幅をポイント数で指定します。
Height 必須 単精度浮動小数点型 (Single) テキスト ボックスの高さをポイント数で指定します。

次の使用例は、新規文書内のキャンバスにテキスト ボックスを追加します。

Sub NewCanvasTextbox() 
 Dim docNew As Document 
 Dim shpCanvas As Shape 
 
 'Create a new document and add a drawing canvas 
 Set docNew = Documents.Add 
 Set shpCanvas = docNew.Shapes.AddCanvas _ 
 (Left:=100, Top:=75, Width:=150, Height:=200) 
 
 'Add a text box to the drawing canvas 
 shpCanvas.CanvasItems.AddTextbox _ 
 Orientation:=msoTextOrientationHorizontal, _ 
 Left:=1, Top:=1, Width:=100, Height:=100 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。