Klasse Shading - Schattierungsattribute (Word VBA)

Enthält Schattierungsattribute für ein Objekt. Um eine Shading -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise


Dim shd as Shading
Set shd = Selection.Shading

BackgroundPatternColor

Gibt die 24-Bit-Farbe, die auf den Hintergrund des Shading-Objekts angewendet wurde, zurück oder legt sie fest. Dies sind mögliche Werte für WdColor.

Diese Eigenschaft kann eine beliebige gültige WdColor -Konstante oder ein von Visual Basic RGB -Funktion zurückgegebener Wert sein.


Set myRange = ActiveDocument.Paragraphs(1).Range 
myRange.Shading.BackgroundPatternColor = _ 
 wdColorTurquoise

BackgroundPatternColorIndex

Gibt die Farbe, die auf den Hintergrund des Shading-Objekts angewendet wurde, zurück oder legt sie fest. Dies sind mögliche Werte für WdColorIndex.


Dim rngTemp As Range 
 
Set rngTemp = ActiveDocument.Paragraphs(1).Range 
rngTemp.Shading.BackgroundPatternColorIndex = wdTurquoise

ForegroundPatternColor

Gibt die 24-Bit-Farbe, die auf den Vordergrund eines Shading-Objekts angewendet wird, zurück oder legt sie fest. Dies sind mögliche Werte für WdColor.

Diese Eigenschaft kann eine beliebige gültige WdColor -Konstante oder ein von Visual Basic RGB -Funktion zurückgegebener Wert sein.


With Selection.Shading 
 .Texture = wdTexture30Percent 
 .ForegroundPatternColor = wdColorTeal 
 .BackgroundPatternColor = wdColorDarkRed 
End With

ForegroundPatternColorIndex

Gibt die Farbe, die auf den Vordergrund eines Shading-Objekts angewendet wird, zurück oder legt sie fest. Dies sind mögliche Werte für WdColorIndex.


With Selection.Shading 
 .Texture = wdTexture30Percent 
 .ForegroundPatternColorIndex = wdBlue 
 .BackgroundPatternColorIndex = wdYellow 
End With

Texture

Gibt eine Textur für die Schattierung des angegebenen Objekts zurück oder legt diese fest. Dies sind mögliche Werte für WdTextureIndex.


Set myRange = ActiveDocument.Paragraphs(1).Range 
myRange.Shading.Texture = wdTextureCross