Range.Select (Word)

Markiert den angegebenen Bereich.

Sub SelectParagraph() 
 ActiveDocument.Paragraphs(1).Range.Select 
 Selection.Font.Bold = True 
End Sub