Interior. PatternColorIndex-Eigenschaft (Word)Interior.PatternColorIndex property (Word)

Gibt die Farbe des innen Musters als Index in der aktuellen Farbpalette oder als eine der folgenden XlColorIndex -Konstanten zurück oder legt Sie fest: xlColorIndexAutomatic oder xlColorIndexNone wird.Returns or sets the color of the interior pattern as an index into the current color palette, or as one of the following XlColorIndex constants: xlColorIndexAutomatic or xlColorIndexNone. Long mit Lese-/Schreibzugriff.Read/write Long.

SyntaxSyntax

Ausdruck. PatternColorIndexexpression.PatternColorIndex

Ausdruck Eine Variable, die einInterior-Objekt darstellt.expression A variable that represents an 'Interior' object.

BemerkungenRemarks

Legen Sie diese Eigenschaft auf xlColorIndexAutomatic fest, um die automatische Füllformat Vorlage für Zeichnungsobjekte anzugeben.Set this property to xlColorIndexAutomatic to specify the automatic fill style for drawing objects. Legen Sie diese Eigenschaft auf xlColorIndexNone, wenn Sie angeben möchten, dass kein Muster verwendet werden soll (hiermit erzielen Sie dasselbe Ergebnis wie mit dem Festlegen der Pattern-Eigenschaft des Interior-Objekts auf xlPatternNone).Set this property to xlColorIndexNone to specify that you do not want a pattern (this is the same as setting the Pattern property of the Interior object to xlPatternNone).

BeispielExample

Im folgenden Beispiel werden positive und negative Abweichungen aktiviert; anschließend wird den negativen Abweichungen ein Zickzackmuster hinzugefügt, und die Farbe des Muster wird für die erste Diagrammgruppe des ersten Diagramms im aktiven Dokument auf Rot festgelegt.The following example enables up and down bars, then adds a criss-cross pattern to the down bars and sets the pattern color to red, for the first chart group of the first chart in the active document.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 With .Chart.ChartGroups(1) 
 .HasUpDownBars = True 
 .DownBars.Interior.Pattern = xlPatternCrissCross 
 .DownBars.Interior.PatternColorIndex = 3 
 End With 
 End If 
End With

Siehe auchSee also

Interior-ObjektInterior Object

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.