Hallo, ich würde gerne aus einer Excel-Liste ein Worddokument erstellen. Dafür würde ich gerne sowohl Listen in die Datei exportieren, als auch einen Text via VBA verfassen. Ich verwende dafür den folgenden Code:

Sub WordDateiErstellen()

Dim MSWord As Object                            ' Bereitet ein Word-Objekt vor
    Set MSWord = CreateObject("Word.Application")   ' Erstellt einen Verweis auf das Word-AcitiveX-Objekt
    MSWord.Visible = True                           ' Wenn Word sichtbar sein soll, diese Option benutzen.

    Datei = "D:\WordTest.doc"                       ' Speicherort und Dateiname
                                                    ' der zu erstellenden Worddatei
    MSWord.Documents.Add                            ' Worddatei erstellen 
    With MSWord.Selection
        .Font.Name = "Arial"                        ' Schriftart setzen
        .Font.Size = 20                             ' Schriftgröße setzen
        .Font.Color = wdColorRed                    ' Schriftfarbe setzen
        .Font.Bold = True                           ' Fettschrift setzen
        .Font.Italic = True                         ' Kursivschrift setzen
        .TypeText Text:="Hallo"                      ' Text in Word-Dokument schreiben
        .TypeParagraph                              ' Zeilenumbruch setzen
    End With

    MSWord.ActiveDocument.SaveAs Datei              ' Dokument abspeichern
    MSWord.ActiveDocument.Close                     ' Dokument schließen

    MSWord.Quit                                     ' Word schliessen
    Set MSWord = Nothing                            ' ActiveX-Verweis entfernen
End Sub

Frage: Wie schaffe ich es, dass der Text "Hallo" rechtsbündig, linksbündig oder zentriert steht?

Vielen Dank!