PictureFormat.ColorsInPalette プロパティ (Publisher)

長い 図のパレット内の色の数を表す値を返します。 読み取り専用です。

構文

ColorsInPalette

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

戻り値

Long

注釈

このプロパティは、TrueColor 以外の画像 (つまり、チャネルあたり 24 ビット未満の色データを含む画像) にのみ適用されます。 TrueColor の図を表す図形の "アクセス許可が拒否されました" を返します。

IsTrueColor プロパティを使用して、画像にチャネルあたり 24 ビット以上のカラー データが含まれているかどうかを判断します。

次の例では、作業中の文書内の各画像をテストし、画像が TrueColor かどうかを出力します。 画像が TrueColor でない場合は、画像のパレット内の色の数を出力します。

For Each pgLoop In ActiveDocument.Pages 
 For Each shpLoop In pgLoop.Shapes 
 If shpLoop.Type = pbLinkedPicture Or shpLoop.Type = pbPicture Then 
 
 With shpLoop.PictureFormat 
 If .IsEmpty = msoFalse Then 
 Debug.Print .Filename 
 If .IsTrueColor = msoTrue Then 
 Debug.Print "This picture is TrueColor" 
 Else 
 Debug.Print "This picture contains " & .ColorsInPalette & " colors." 
 End If 
 End If 
 End With 
 
 End If 
 Next shpLoop 
Next pgLoop 

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

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