Range.Font (Word)
Devuelve o establece un objeto Font que representa el formato de carácter del objeto especificado.
Para establecer esta propiedad, especifique una expresión que devuelva un objeto Font .
ActiveDocument.Styles(wdStyleHeading1).Font.Bold = False