Shapes.AddTextbox メソッド (Publisher)
テキスト ボックスを表す新しい Shape オブジェクトを、指定した Shapes コレクションに追加します。
構文
式。AddTextbox (Orientation, Left, Top, Width, Height)
表現Shapes オブジェクトを表す変数です。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
Orientation | 必須 | PbTextOrientation | テキスト ボックス内のテキストの向きを指定します。 |
Left | 必須 | バリアント型 (Variant) | テキスト ボックスを表す図形の左端の位置を指定します。 |
Top | 必須 | バリアント型 (Variant) | テキスト ボックスを表す図形の上端の位置を指定します。 |
Width | 必須 | バリアント型 (Variant) | テキスト ボックスを表す図形の幅を指定します。 |
Height | 必須 | バリアント型 (Variant) | テキスト ボックスを表す図形の高さを指定します。 |
戻り値
Shape
注釈
Left、Top、Width、Height の各パラメーターでは、数値はポイント単位で評価されます。文字列は、Microsoft Publisher でサポートされている任意の単位 (例: "2.5 in") に含めることができます。
Orientation パラメーターには、Microsoft Publisher タイプ ライブラリで宣言され、次の表に示す PbTextOrientation クラスの定数のいずれかを指定できます。
定数 | 説明 |
---|---|
pbTextOrientationHorizontal | 左から右へ記述する言語用の横書きのテキスト ボックス。 |
pbTextOrientationRightToLeft | 右から左へ記述する言語用の横書きのテキスト ボックス。 この定数は、右から左に記述する言語が選択されていない場合は無効です。 |
pbTextOrientationVerticalEastAsia | 東アジア言語用の縦書きのテキスト ボックス。 東アジア言語以外の言語が選択されている場合、テキストは右に 90 度回転されて表示されます。 |
例
次の使用例は、作業中の文書の先頭ページに、新しい横書きのテキスト ボックスを追加します。
Dim shpTextBox As Shape
Set shpTextBox = ActiveDocument.Pages(1).Shapes.AddTextBox _
(Orientation:=pbTextOrientationHorizontal, _
Left:=144, Top:=144, _
Width:=72, Height:=18)
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。
フィードバック
https://aka.ms/ContentUserFeedback」を参照してください。
以下は間もなく提供いたします。2024 年を通じて、コンテンツのフィードバック メカニズムとして GitHub の issue を段階的に廃止し、新しいフィードバック システムに置き換えます。 詳細については、「フィードバックの送信と表示