ShadowFormat.ForeColor (Word)

Devuelve o establece un objeto ColorFormat que representa el color de primer plano del relleno, de la línea o de la sombra.

Dim cftForeColor As ColorFormat
Set cftForeColor = Selection.Font.TextShadow.ForeColor