Макрос для изменения связи с файлами

Добрый день!

Столкнулся с такой проблемой - при сохранении документа в формате docx из html, картинки сохраняются как ссылки на папку <имя_файла.files>. Соответственно на другом компьютере картинок уже нет, только надпись, что они недоступны.
В Файл->Сведения есть опция "Изменить связи с файлами". И вот там надо проставить галочки на "Хранить в документе". Но порой бывает очень много файлов. Можно сделать макрос, который бы для всех файлов ставил эту галочку? Нашел на форуме как удалить связи с файлами:

Dim oFld As Field
    For Each oFld In ActiveDocument.Fields
        If oFld.Type = wdFieldLink Then oFld.Unlick
    Next

А как сделать наоборот? Т.е. связь будет удалена, но картинка будет сохранена в docx документе.
К сожалению в VBA не силен, прошу помощи.
Спасибо.