BackgroundPatternColor Property Example

This example applies turquoise background shading to the first paragraph in the active document.

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

This example adds a table at the insertion point and then applies light gray background shading to the first cell.

Selection.Collapse Direction:=wdCollapseStart
Set myTable = _
    ActiveDocument.Tables.Add(Range:=Selection.Range, _
    NumRows:=2, NumColumns:=2)
myTable.Cell(1, 1).Shading.BackgroundPatternColor = _
    wdColorGray25