2016-09-02 2 views
2

У меня есть этот код, который просматривает почтовую почту Outlook.Ошибка при попытке выполнения операции

Dim wordDoc As Word.Document '<--- 
Dim objMail as Object 

Set objOutlook = CreateObject("Outlook.Application") 
Set objMail = objOutlook.CreateItem(0) 
Set attach = objMail.attachments 
Set wordDoc = objMail.GetInspector.WordEditor 

Моя проблема заключается в том, что, там уже раз, что эта линия Set wordDoc = objMail.GetInspector.WordEditor возвращает ошибку, говорящую:

«Покушение Операция не удалась.»

Это держит меня подвешенным, и я не знаю, как с ним справиться. Любая помощь?

+1

У вас есть ошибка в Dim oOutlook As Object, вы используете objOutlook, но я не думаю, что это проблема. Код работает для меня каждый раз ... –

+0

Какое свойство или метод вызывает точно генерирует исключение/ошибку? Вы пытались разбить цепочку вызовов свойств и методов и объявить их по отдельным строкам кода? –

ответ

0

Прежде всего, я предлагаю разбить цепочку вызовов свойств и методов и объявить их на отдельных строках кода. Это позволяет найти, какое свойство или метод вызывает проблему.

Dim inspector as Outlook.Inspector 

Set inspector = objMail.GetInspector 
Set wordDoc = inspector.WordEditor 

Где и когда вы пытаетесь получить редактор Word? Это обработчик события ItemSend?

+0

Я использую его, прежде чем я должен просмотреть сообщение. – ramj

0

WordEditor может иногда терпеть неудачу, если инспектор еще не виден. Зачем вам нужен объект Word?

+0

Мне нужно скопировать элемент из excel в Outlook. – ramj

+0

Зачем для этого нужен объект Word? Почему бы не установить свойство HTMLBody в правильно отформатированный HTML? –