ShadowFormat.ForeColor (Word)
Retorna ou define um objeto ColorFormat que representa a cor de primeiro plano do preenchimento, linha ou sombra. Leitura/gravação.
Dim cftForeColor As ColorFormat
Set cftForeColor = Selection.Font.TextShadow.ForeColor