2014-09-14 3 views
3

Я пытаюсь открыть шаблон электронной почты Outlook 2010 с помощью Excel. Я получаю следующее сообщение об ошибке:Попытка открыть шаблон электронной почты Outlook с помощью excel VBA

«Ошибка выполнения„-2147287038 (80030002)“: Не удается открыть файл: C:. \ My \ Путь \ MyTemplate.oft Файл не может существовать, вы не можете иметь разрешить его открыть или открыть в другой программе. Щелкните правой кнопкой мыши папку, содержащую этот файл, и выберите «Свойства», чтобы проверить права на эту папку ».

Файл существует (в нужном месте), я проверил разрешения (насколько я знаю, как), и файл еще не открыт.

Вот мой код:

Sub Mail_experiment() 
    Dim OutApp As Outlook.Application 
    Dim OutMail As Outlook.mailitem 
    Set OutApp = CreateObject("Outlook.Application") 
    Set OutMail = OutApp.CreateItemFromTemplate("C:\My\Path\MyTemplate.oft") 
    On Error Resume Next 
    With OutMail 
     .to = "[email protected]" 
     .CC = "" 
     .BCC = "" 
     .Subject = "This is my Subject line" 
     .Send 
    End With 
    On Error GoTo 0 
    Set OutMail = Nothing 
    Set OutApp = Nothing 
    End Sub 

Спасибо за любую помощь !!!

+0

Ваш код отлично работает в моей системе. Если файл не существует, я получаю ошибку времени выполнения 42. (Имя файла или имя класса не обнаружено во время операции автоматизации). Я могу открыть шаблон вручную, пока код работает без ошибок. Что происходит, когда вы просматриваете файл шаблона «C: \ My \ Path \ MyTemplate.oft» и пытаетесь открыть его вручную? –

+0

Я могу открыть его вручную. Я просто не могу это сделать с VBA. Я пробовал его с Outlook открытым, а Outlook закрыт. Я могу отправить NEW электронные письма с помощью кода. Я просто не могу открыть шаблон. –

+0

Кевин, я забыл выразить свою признательность за ваши усилия. Спасибо! –

ответ

2

«Я попробовал свой код на другом компьютере, и он сработал. Я вернулся и изменил имя моего шаблона, поскольку предыдущее имя было во всех столицах (не имеет значения, правильно?). сообщение о необходимости быть администратором для этого, что, по моему мнению, было странным, так как это мой личный домашний компьютер. Однако, когда я нажал «продолжить», он пошел дальше и изменил название. Теперь он работает. - David Elphee 14 сен 14 at 13:23 "

+1

Сообщество wiki. Ответ в комментарии. Любой, кто найдет эту тему в поиске, увидит, что есть ответ и, скорее всего, найдет полезный ответ. – niton

+0

Действительно, это хороший помощник рефлекса! ;) – R3uK

Смежные вопросы