Partager via


Propriété PictureFormat.IsTrueColor (Publisher)

Renvoie une constante MsoTriState indiquant si l’image ou l’objet OLE spécifié contient des données de couleur de 24 bits ou plus par canal. En lecture seule.

Syntaxe

expression. IsTrueColor

Expression Variable qui représente un objet PictureFormat .

Valeur renvoyée

MsoTriState

Remarques

Pour les images qui ne sont pas trueColor, utilisez la propriété ColorsInPalette pour déterminer le nombre de couleurs dans la palette de l’image.

La valeur de la propriété IsTrueColor peut être une des constantes MsoTriState déclarées dans la bibliothèque de type Microsoft Office et affichées dans le tableau suivant.

Constante Description
msoFaux L'image spécifiée ne contient pas de données de couleur 24 bits par canal ou supérieur.
msoTriEtatMélangé Valeur de retour indiquant une combinaison de msoTrue et msoFalse pour la plage de formes spécifiée.
msoVrai L'image spécifiée contient des données de couleur 24 bits par canal ou supérieur.

Exemple

L’exemple suivant teste chaque image du document actif et imprime si l’image est TrueColor. S’il n’est pas TrueColor, l’exemple montre comment afficher le nombre de couleurs dans la palette de l’image.

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 

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.