Selection.Shading (Word)

Devuelve un objeto shading que hace referencia al formato de sombreado de la selección especificada.

Dim shdShading As Shading
Set shdShading = Selection.Shading