Range.Font (Word)
Retorna ou define um objeto Font que representa a formatação de caractere do objeto especificado. Font de leitura/gravação.
Para definir essa propriedade, especifique uma expressão que retorne um objeto Font .
ActiveDocument.Styles(wdStyleHeading1).Font.Bold = False