テキスト ラベルを表す新しい Shape オブジェクトを、指定した Shapes コレクションに追加します。
構文
式。AddLabel (方向、 左、 上、 幅、 高さ)
表現Shapes オブジェクトを表す変数です。
パラメーター
| 名前 | 必須 / オプション | データ型 | 説明 |
|---|---|---|---|
| Orientation | 必須 | PbTextOrientation | ラベル内のテキストの向きを指定します。 PbTextOrientation 定数の 1 つを指定できます。 |
| Left | 必須 | バリアント型 (Variant) | テキスト ラベルを表す図形の左端の位置を指定します。 |
| Top | 必須 | バリアント型 (Variant) | テキスト ラベルを表す図形の上端の位置を指定します。 |
| Width | 必須 | バリアント型 (Variant) | テキスト ラベルを表す図形の幅を指定します。 |
| Height | 必須 | バリアント型 (Variant) | テキスト ラベルを表す図形の高さを指定します。 |
戻り値
Shape
注釈
Left、Top、Width、および Height の各引数の場合、数値はポイント単位で評価されます。文字列は、Microsoft Publisher でサポートされている任意の単位で指定できます (たとえば、"2.5 in")。
例
次の使用例は、作業中の文書の先頭ページに、新しい横書きのテキスト ラベルを追加します。
Dim shpLabel As Shape
Set shpLabel = ActiveDocument.Pages(1).Shapes.AddLabel _
(Orientation:=pbTextOrientationHorizontal, _
Left:=144, Top:=144, _
Width:=72, Height:=18)
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。