Font.TextColor (Word)

Devuelve un objeto ColorFormat que representa el color de la fuente especificada.

Dim cftTextColor As ColorFormat
Set cftTextColor = Selection.Font.TextColor