Что делать, когда я получаю ошибку времени выполнения 91 Переменная объекта или переменная блока не установлена - PullRequest
0 голосов
/ 03 июля 2019

Я устанавливаю шаблон электронной почты в формате HTML в Outlook. Я придерживаюсь следующих рекомендаций: https://www.outlook -apps.com / insert-html-to-outlook-emails / (раздел Как вставить чистый HTML-код в Outlook, имеющий 8 шагов). Я сделал это около месяца назад с успехом. HTML-шаблон можно было красиво открыть в Outlook (как описано в шаге 8).

Сегодня я удалил тот, который работал, и попытался установить новый. Я понятия не имею, что я сделал по-другому, но это больше не работает.

Я получаю сообщение об ошибке: ошибка времени выполнения 91 Переменная объекта или переменная блока не установлена ​​

Единственный код, в котором я на самом деле пишу, это тот, который я копирую вставить с шага 5, а затем я пишу следующий путь:

C: \ Users \ Maja \ Documents \ news.html - потому что именно здесь находится мой HTML-шаблон.

Я ожидаю, что при выполнении шага 8 откроется новое электронное письмо с моим html-шаблоном (news.html).

Ответы [ 2 ]

0 голосов
/ 03 июля 2019

Проблема решена.Я был достаточно глуп, чтобы не открыть первое письмо Outlook и только потом перейти на вкладку «Разработчик» -> «Макросы», чтобы выбрать мой шаблон.

Возможно, именно поэтому у меня возникла эта ошибка при открытии электронного письма в окне проводникакак предположил Евгений.

0 голосов
/ 03 июля 2019

Скорее всего, новое электронное письмо открывается в окне Explorer. Код, указанный на странице, использует свойство ActiveInspector , которое возвращает самый верхний объект Inspector на рабочем столе. Если окно инспектора не отображается, вы можете получить сообщение об ошибке, описанное в вашем сообщении.

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

Попробуйте удалить условие из кода:

Dim insp As Inspector
Dim wordDoc As Word.Document

Set insp = ActiveInspector
Set wordDoc = insp.WordEditor
wordDoc.Application.Selection.InsertFile "e:\test.html", , False, False, False

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...