Shapes.AddEmptyPictureFrame メソッド (Publisher)

指定した座標に挿入された空の額縁を表す Shape オブジェクトを返します。

構文

式。AddEmptyPictureFrame (左、 上、 幅、 高さ)

表現Shapes オブジェクトを表す変数です。

パラメーター

名前 必須 / オプション データ型 説明
Left 必須 バリアント型 (Variant) 図を表す図形の左端の位置を指定します。
Top 必須 バリアント型 (Variant) 図を表す図形の上端の位置を指定します。
Width オプション バリアント型 (Variant) 図を表す図形の幅を指定します。 既定値は -1 で、これは、パラメーターを指定しなかった場合、図の幅が自動的に 72 ポイントに設定されることを示します。
Height オプション バリアント型 (Variant) 図を表す図形の高さを指定します。 既定値は -1 で、これは、パラメーターを指定しなかった場合、図の高さが自動的に 54 ポイントに設定されることを示します。

戻り値

Shape

注釈

Left、Top、Width、Height の各引数の場合、数値はポイント単位で評価されます。文字列は、Microsoft Publisher でサポートされている任意のユニット ("1.5 in" など) に含めることができます。

空白の図枠には、既定のツールヒント "空の図枠" があります。 図形の画像が選択されている場合、これは "図" に変更されます。

例

この例では、空の図枠を文書の最初のページの中央に配置し、それを 45 度の角度で回転します。 AlternativeText プロパティは、Web の Picture Placeholder 1 に設定されています。

Dim shpPlaceholder As Shape 
 
Set shpPlaceholder = _ 
 ActiveDocument.Pages(1).Shapes.AddEmptyPictureFrame( _ 
 230, 320, 150, 150) 
 
With shpPlaceholder 
 .AlternativeText = "Picture Placeholder 1" 
 .Rotation = 45 
End With

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

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

  • Last updated on