Paragraph.Range (Word)

Retorna um objeto Range que representa a parte de um documento que está contida no parágrafo especificado.

ActiveDocument.Paragraphs(1).Range.Style = wdStyleHeading1