Eu encontrei uma correção do VBA para redefinir qualquer estilo, e isso funciona. Aqui está o código VBA:
Private Sub ClearStyle(sStyleName As String)
Dim oStyle As Variant
Set oStyle = ActiveDocument.Styles(sStyleName)
With ActiveDocument.Styles(oStyle)
If .BaseStyle <> "" Then
.Font = .BaseStyle.Font
.ParagraphFormat = .BaseStyle.ParagraphFormat
End If
End With
End Sub
Public Sub clearDirtyStyles()
ClearStyle "Heading 8"
End Sub
Ao chamar a macro ClearDirtyStyles VBA do modelo quebrado, o estilo é redefinido.
Eu testei novamente no MS Word para Mac 2016 e ele funciona. Tente você mesmo brincando com as cores da fonte em Heading 1
, Heading 2
e Heading 3
e, em seguida, execute ClearStyle "Heading 3"
.