Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.74/19: Рейтинг темы: голосов - 19, средняя оценка - 4.74
1258 / 144 / 32
Регистрация: 11.02.2011
Сообщений: 418
1

Выбор учётной записи в Outlook при отправке почты из Excel

25.02.2014, 11:19. Просмотров 3625. Ответов 2
Метки нет (Все метки)

Добрый день. Что-то не могу выиграть отправку почты. Есть
Visual Basic
1
2
3
4
5
6
7
    Dim OutApp As Object
    Dim OutMail As Object
    Dim cell As Range
    Application.ScreenUpdating = True
    Set OutApp = CreateObject("Outlook.Application")
    OutApp.Session.Logon
    'затем создаём письмо, крепим вложения, отправляем
Не могу разобраться как настроить выбор учётной записи. Вроде должно быть что-то вроде
Visual Basic
1
Set sm = OutApp.Session.Accounts(2)
Но тут мне только ошибку кушать дают. Хотя в самом аутлуке команда проходит. Где я неправ?
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.02.2014, 11:19
Ответы с готовыми решениями:

Отправка почты с нужной учетной записи с Outlook
Привет. Подскажите пожалуйста, как можно настроить данный макрос, чтобы он в outlook (где несколько...

Закрывается база данных при отправке почты через outlook
Всем доброе утро! Прошу помощи в решении такой проблемы. Есть разделенная,...

Ошибка при добавлении учетной записи почты Google
Не могу добавить уч.запись почты google в стандартное приложение Почта в Win10. Кто знает в чем...

Ошибка при создании учетной записи в microsoft outlook 2010
Здравствуйте! При создании учетной записи (рис 1) в Microsoft Outlook 2010 появилось сообщение...

2
2769 / 703 / 104
Регистрация: 04.02.2011
Сообщений: 1,432
25.02.2014, 11:28 2
Метод .Logon имеет четыре опциональных параметра: Profile, Password, ShowDialog, NewSession
Пример из справки:
Visual Basic
1
2
3
4
5
6
7
Sub StartOutlook()
 Dim myOlApp As New Outlook.Application
 Dim myNameSpace As Outlook.NameSpace
 
 Set myNameSpace = myOlApp.GetNamespace("MAPI")
 myNameSpace.Logon "LatestProfile", , True, True
End Sub
0
1258 / 144 / 32
Регистрация: 11.02.2011
Сообщений: 418
25.02.2014, 11:49  [ТС] 3
Рисую
Visual Basic
1
OutApp.Session.Logon("aaa@aaa.ru")
Отправка всёравно топает с другой учётки. Может письмо как-то по другому создавать Сейчас
Visual Basic
1
Set OutMail = OutApp.CreateItem(olMailItem)
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
25.02.2014, 11:49

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Зависает письмо в исходящих MS Outlook при отправке с MS Word|MS Excel
Приветствую форумчан. Проблема в следующем: Пользователь работает в Ворд, затем, не закрывая...

Миграция параметров учетной записи с MS Outlook 2003 в MS Outlook 2013
Доброго времени суток, Вопрос: я пользовался MS Outlook 2003, и в нем, у меня были...

Outlook 2010. Как выполнить отображение новой учетной записи на месте файла данных Outlook?
Здраввствуйте! Вопрос такой: как сделать вместо отображения "Файл данных Outlook" новой учетной...

Выбор учетной записи при входе в эксплорер
что такое? и как убрать?


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.