PictureFormat.IsTrueColor property (Publisher)

Returns an MsoTriState constant indicating whether the specified picture or OLE object contains color data of 24 bits per channel or greater. Read-only.

Syntax

expression.IsTrueColor

expression A variable that represents a PictureFormat object.

Return value

MsoTriState

Remarks

For pictures that are not TrueColor, use the ColorsInPalette property to determine the number of colors in the picture's palette.

The IsTrueColor property value can be one of the MsoTriState constants declared in the Microsoft Office type library and shown in the following table.

Constant Description
msoFalse The specified picture does not contain color data of 24 bits per channel or greater.
msoTriStateMixed A return value indicating a combination of msoTrue and msoFalse for the specified shape range.
msoTrue The specified picture contains color data of 24 bits per channel or greater.

Example

The following example tests each picture in the active document and prints whether the picture is TrueColor. If it is not TrueColor, the example prints how many colors are in the picture's palette.

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 

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.