PictureFormat.ImageFormat プロパティ (Publisher)

Microsoft Windows グラフィックス デバイス インターフェイス (GDI+) によって決定される画像の画像形式を表す PbImageFormat 定数を返します。 読み取り専用です。

構文

式。ImageFormat

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

戻り値

PbImageFormat

注釈

ImageFormat プロパティは、いずれかを使用する必要がある場合に、プレース ホルダーの図ではなく、元の画像に適用されます。

ImageFormat プロパティの値には、Microsoft Publisher のタイプ ライブラリで宣言されている PbImageFormat 定数のいずれかを指定できます。

ImageFormat プロパティは、元のファイル形式ではなく、Windows 環境にインポートした後、画像の形式を示します。 画像のファイル形式が Windows オペレーティング システムでネイティブにサポートされていない場合、画像は、本来サポートされているアナログ形式に変換されます。 その結果、 pbImageFormatCMYKJPEG 、 pbImageFormatDIB 、 pbImageFormatEMF 、 pbImageFormatGIF 、および pbImageFormatPICT の各定数、頻度の低い場合は、これまでが返されます。

特定のファイル形式の変換については、次の表を参照してください。

ファイル形式	返される定数
.bmp、.dib、.gif、.pict	pbImageFormatPNG
.emf、.eps、.epfs	pbImageFormatWMF
CMYK .jfif, .jpeg, .jpg	pbImageFormatJPEG

Windows GDI+ は、2 次元のベクター グラフィックス、イメージング、および文字体裁を提供する Windows オペレーティング システムと Windows Server オペレーティング システムの一部です。

例

次の使用例は、作業中の文書内に存在する .jpg および .jpeg イメージのリストを出力します。

Dim pgLoop As Page 
Dim shpLoop As Shape 
 
For Each pgLoop In ActiveDocument.Pages 
 For Each shpLoop In pgLoop.Shapes 
 
 If shpLoop.Type = pbPicture Or shpLoop.Type = pbLinkedPicture Then 
 
 With shpLoop.PictureFormat 
 If .IsEmpty = msoFalse Then 
 
 If .ImageFormat = pbImageFormatJPEG Then 
 Debug.Print .Filename 
 End If 
 
 End If 
 End With 
 
 End If 
 
 Next shpLoop 
Next pgLoop 

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

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