Delphi и Word, макросы.

[Aces of Spades]

Работаю в 2010 Word и Rad studio 2010.

Столкнулся с проблемой в переписывании макроса в программный код Delphi, дальше покажу где именно на примере кода.
Прошу о помощи.

Selection.TypeText Text:=" " // что делать с TypeText Text?
    Selection.TypeParagraph
    Selection.TypeParagraph
    Selection.TypeParagraph
    Selection.TypeParagraph
    Selection.TypeParagraph
    Selection.TypeParagraph
    Selection.Font.Name = "Times New Roman"// как прописать правильно шрифт? 
    Selection.Font.Size = 12
    Selection.TypeText Text:="                                    "
    Application.Keyboard (1049)
    Application.Keyboard (1041)
    Application.Keyboard (1033)
    Application.Keyboard (1049)
    Selection.LanguageID = wdRussian
    Selection.NoProofing = False
    Application.CheckLanguage = True
    Selection.LanguageID = wdRussian
    Selection.NoProofing = False
    Application.CheckLanguage = True
    Selection.LanguageID = wdRussian
    Selection.NoProofing = False
    Application.CheckLanguage = True
    Selection.TypeText Text:= _
        "                                                      ""Утвер"// что мне делать с этим?
    Selection.TypeText Text:="ждаю"""
    Selection.TypeParagraph
    Selection.TypeText Text:= _
        "                                                            "
    Selection.TypeText Text:= _
        "              Генеральный директор ООО""тр Сервис"""
    Selection.MoveLeft Unit:=wdCharacter, Count:=12
    Selection.TypeText Text:=" "
    Selection.MoveRight Unit:=wdCharacter, Count:=14
    Selection.MoveUp Unit:=wdLine, Count:=1
    Selection.MoveRight Unit:=wdCharacter, Count:=1
    Selection.MoveUp Unit:=wdLine, Count:=1
    Selection.TypeText Text:= _
        "                                                            "
    Selection.TypeText Text:="                            "
    Selection.Font.Name = "Times New Roman"
    Selection.Font.Size = 12
    Selection.TypeText Text:="_________________________ Е.А. тптпав"

[Aces of Spades]

Разобрался я что делать с кодом.
Стоило всего лишь переписать в ручную.
Осталась 1 проблема

MsWord.Selection.TypeText (Text:= _
        '                                                      ''Утвер');

В этой части кода выдает ошибку..
Помогите с этим.

[Stilet]

"_" - это если не ошибаюсь перенос длинной строки в бейсике.
Убери его из кода.
И '' тоже убери перед словом.

[DiemonStar]

MsWord.Selection.TypeText ("Утверждаю");

должно работать...

з.ы. судя по всему, макрос записан "магнитофоном". В реальности можно сделать намного короче.