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.
Feedback
https://aka.ms/ContentUserFeedback.
Coming soon: Throughout 2024 we will be phasing out GitHub Issues as the feedback mechanism for content and replacing it with a new feedback system. For more information see:Submit and view feedback for