PictureFormat.ColorModel-Eigenschaft (Publisher)

Gibt eine PbColorModel-Konstante zurück, die das Farbmodell des Bilds darstellt. Schreibgeschützt.

Syntax

Ausdruck. ColorModel

Ausdruck Eine Variable, die ein PictureFormat-Objekt darstellt.

Rückgabewert

PbColorModel

Hinweise

Der Wert der ColorModel-Eigenschaft kann eine der in der Microsoft Publisher-Typbibliothek deklarierten PbColorModel-Konstanten sein.

Beispiel

Das folgende Beispiel gibt eine Liste der Grafiken in der aktiven Publikation zurück, die den Farbmodus RGB aufweisen.

Sub ListRGBPictures() 
Dim pgLoop As Page 
Dim shpLoop As Shape 
 
 For Each pgLoop In ActiveDocument.Pages 
 For Each shpLoop In pgLoop.Shapes 
 
 If shpLoop.Type = pbPicture Or shpLoop.Type = pbLinkedPicture Then 
 
 With shpLoop.PictureFormat 
 If .IsEmpty = msoFalse Then 
 If .ColorModel = pbColorModelRGB Then 
 Debug.Print .Filename 
 End If 
 End If 
 End With 
 
 End If 
 
 Next shpLoop 
 Next pgLoop 
 
End Sub

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.