LineFormat.ForeColor (Word)

Retorna ou define um objeto ColorFormat que representa a cor de primeiro plano da linha. Leitura/gravação.

Dim docActive As Document 
 
Set docActive = ActiveDocument