Задать формат рисунка при встаке

[alex77755]

Работаю с документом из VB6
Разобрался со всеми вопросами кроме одного:
Вставляю в колонтитул рисунок:

ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
    Selection.InlineShapes.AddPicture FileName:=Лого.Text, _
        LinkToFile:=False, SaveWithDocument:=True

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

[Вождь]

Используя Shapes вместо InLineShapes. Как раз привязкой они и отличаются:

    ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
    ActiveDocument.Shapes.AddPicture _
        FileName:="Лого.Text", _
        Anchor:=Selection.Range