PictureFormat.ColorsInPalette-Eigenschaft (Publisher)

Artikel
04/07/2023

Gibt eine lange, die die Anzahl der Farben in der Palette der Grafik darstellt. Schreibgeschützt.

Syntax

Ausdruck. ColorsInPalette

Ausdruck Eine Variable, die ein PictureFormat-Objekt darstellt.

Rückgabewert

Long

Hinweise

Diese Eigenschaft betrifft nur Grafiken, bei denen es sich nicht um TrueColor handelt (d. h. Grafiken, die Farbdaten von weniger als 24 Bit pro Kanal enthalten). Gibt "Berechtigung verweigert" für Formen zurück, die Bilder darstellen, die TrueColor sind.

Verwenden Sie die IsTrueColor-Eigenschaft , um zu bestimmen, ob ein Bild Farbdaten von 24 Bit pro Kanal oder höher enthält.

Beispiel

Im folgenden Beispiel wird jede Grafik im aktiven Dokument getestet und gedruckt, ob es sich bei der Grafik um TrueColor handelt. Ist dies nicht der Fall, wird im Ausdruck angegeben, wie viele Farben die Palette der Grafik aufweist.

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 und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

Freigeben über