ShapeRange.SaveAsPicture メソッド (Publisher)

  • [アーティクル]

1 つ以上の図形範囲を図ファイルとして保存します。

構文

式。SaveAsPicture (FileName, pbResolution)

式ShapeRange オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
FileName 必須 String 作成する新しい画像ファイルのパスとファイル名。 画像が保存されるグラフィックス形式は、指定したファイル名拡張子 (.jpgや.gifなど) によって決まります。
pbResolution オプション PbPictureResolution 保存する図の解像度を指定します。 PbPictureResolution 定数の 1 つを指定できます。

例

次の Microsoft Visual Basic for Applications (VBA) マクロでは, .jpg 画像ファイルとしては、作業中の文書の最初のページ上のすべての図形を保存するのには、 SaveAsPicture メソッドを使用する方法を示します。

このコードを実行する前に、 を有効なファイル名と、ファイルを保存するアクセス許可を持つコンピューター上のフォルダーへのパスに置き換えます filename.jpg 。

Public Sub SaveAsPicture_Example() 
 
 Dim pubShapeRange As Publisher.ShapeRange 
 Set pubShapeRange = ThisDocument.Pages(1).Shapes.Range 
 
 pubShapeRange.SaveAsPicture "filename.jpg" 
 
End Sub

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

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