PictureFormat.IsGreyScale プロパティ (Publisher)
画像がグレースケール 画像であるかどうかを示す MsoTriState 定数を返します。 読み取り専用です。
構文
式。IsGreyScale
式PictureFormat オブジェクトを表す変数。
戻り値
MsoTriState
注釈
IsGreyScale プロパティの値には、Microsoft Office のタイプ ライブラリで宣言されているし、次の表に示す msotristate クラス の定数のいずれかを指定できます。
定数 | 説明 |
---|---|
msoFalse | 指定した図はグレースケール イメージではありません。 |
msoTriStateMixed | MsoTrue と msoFalse を指定した図形範囲の組み合わせを示します。 |
msoTrue | 指定した図はグレースケール イメージです。 |
例
次の使用例は、作業中の文書に含まれるグレースケールの図のリストを取得します。
Sub ListGreyScalePictures()
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 And .IsGreyScale = msoCTrue Then
Debug.Print .Filename
Debug.Print "Page " & pgLoop.PageNumber
End If
End With
End If
Next shpLoop
Next pgLoop
End Sub
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。