Автостарт макроса

[vuk]

Есть огромное количество документов MSWord (*.doc) в которых введена устаревшая информация наряду с полезной, каждый раз при использовании таких файлов приходится вручную исправлять то, что уже не актуально. Выход - автоматизировать.
Пишем макрос, вставляем его в Normal.dot, теперь его возможно запустить независимо от того, какой докумунт открыт, но открыв файл постоянно лезть свойства\макрос\запустить не менее трудоемко.

Вопрос: каким образом заставить автоматически запуститься макрос при открытии любого документа?

[LightImage]

В Normal.dot в модуле объекта ThisDocument пишем функцию

Private Sub Document_Open()
Dim msg As String
    msg = "Открытие документа с именем " & ActiveDocument.FullName
    MsgBox msg, vbInformation, "Тест"
End Sub