Я недавно обновил свой компьютер с Windows 7 до Windows 10. Я продолжал использовать Office 2016 на протяжении всего процесса, однако сейчас я использую 64-битную версию Excel, тогда как ранее мой код VBA был написан на 32-битной версии. Я просто пытаюсь автоматизировать электронную почту с помощью Excel VBA:
Dim outlookapp As Object
Dim outlookmailitem As Object
Set outlookapp = CreateObject("Outlook.Application")
Set outlookmailitem = outlookapp.createitem(0)
Код падает в строке:
Set outlookapp = CreateObject("Outlook.Application")
Где я получаю сообщение об ошибке:
Ошибка выполнения '429': Active X не может создать объект.
Я провел довольно обширное исследование и не могу найти решение этой ошибки. Меня убеждают, что мне нужно немного изменить свой код, чтобы он был совместим с 64-битным VBA, но я не знаю, как это сделать.
Я пытался:
- Использование метода раннего связывания (например, Dim outlookapp в качестве Outlook.Application)
- Пометка определенных ссылок в разделе Инструменты> Ссылки
- Проверка правильности пути к файлу находится в разделе реестра
Ни один из которых не работал. В идеале я хотел бы избежать удаления 64-битной и переустановки 32-битной. Любые идеи будут высоко оценены.