ActiveDocument.Background.Fill.ForeColor ' return ' 16777215 ' it means white
Selection.Font.ColorIndex = ActiveDocument.Background.Fill.ForeColor ' return error