Range.Shading (Word)

Devuelve un objeto shading que hace referencia al formato de sombreado del objeto especificado.

With Selection.Paragraphs(1).Shading 
 .Texture = wdTexture12Pt5Percent 
 .BackgroundPatternColorIndex = wdYellow 
 .ForegroundPatternColorIndex = wdBlack 
End With