Как винаги да изпращате нов имейл от конкретен акаунт в Outlook?
Да предположим, че сте създали няколко имейл акаунта във вашия Outlook, когато изпращате имейл в Outlook, имейл акаунтът, показан в полето От, зависи от това в кой акаунт сте в момента. Без значение в кой акаунт сте в момента, искате винаги да изпращате нови имейли от конкретен имейл акаунт, следният урок може да ви помогне, методът в този урок може да ви помогне.
Винаги изпращайте нов имейл от конкретен акаунт с VBA код
- Автоматизирайте изпращането на имейл с Автоматично CC/BCC, Автоматично препращане по правила; изпрати Автоматичен отговор (Извън офиса) без да е необходим сървър за обмен...
- Получавайте напомняния като BCC Предупреждение когато отговаряте на всички, докато сте в списъка BCC, и Напомняне при липсващи прикачени файлове за забравени прикачени файлове...
- Подобрете ефективността на имейл с Отговор (на всички) с прикачени файлове, Автоматично добавяне на поздрав или дата и час в подпис или тема, Отговорете на няколко имейла...
- Опростете изпращането на имейл с Извикване на имейли, Инструменти за прикачване (Компресиране на всички, автоматично запазване на всички...), Премахване на дубликати, и Бърз доклад...
Винаги изпращайте нов имейл от конкретен акаунт с VBA код
Този VBA код може да ви помогне лесно да изпращате нови имейли от конкретен акаунт в Outlook. Моля, направете следното.
1. Моля, натиснете Друг + F11 за да отворите Microsoft Visual Basic за приложения диалогов прозорец.
2. Разширете Project1 > Обекти на Microsoft Outlook като щракнете двукратно върху тях. И след това щракнете два пъти върху ThisOutlookSession за да отворите VbaProject.OTM диалогов прозорец.
3. Копирайте и поставете следния VBA код в диалоговия прозорец.
VBA: винаги изпращайте нов имейл от конкретен акаунт.
Public Sub NewBySpecAccount()
Dim oAccount As Outlook.Account
Dim oMail As Outlook.MailItem
For Each oAccount In Application.Session.Accounts
If oAccount.DisplayName = "Your account name" Then
Set oMail = Application.CreateItem(olMailItem)
oMail.SendUsingAccount = oAccount
oMail.Display
End If
Next
End Sub
4. Сега трябва да промените „Името на вашия акаунт” към имейл акаунта, на който искате винаги да изпращате нови имейли. Вижте екранна снимка:
5. След това натиснете F5 клавиш на клавиатурата, за да стартирате VBA кода.
6. След стартиране на кода на VBA, нов Събщение ще се появи прозорец, моля, напишете своя имейл и щракнете Изпрати бутон, за да го изпратите.
Забележка: Този VBA код е успешно тестван в Outlook 2007, 2010 и 2013, но не се изпълнява в Exchange 2007 и 2010.
Най-добрите инструменти за продуктивност в офиса
Kutools за Outlook - Над 100 мощни функции, за да заредите вашия Outlook
🤖 AI Mail Assistant: Незабавни професионални имейли с AI магия - с едно щракване до гениални отговори, перфектен тон, многоезично владеене. Трансформирайте имейла без усилие! ...
📧 Автоматизиране на имейли: Извън офиса (налично за POP и IMAP) / График за изпращане на имейли / Автоматично CC/BCC по правила при изпращане на имейл / Автоматично пренасочване (разширени правила) / Автоматично добавяне на поздрав / Автоматично разделяне на имейлите с множество получатели на отделни съобщения ...
📨 Управление на Email: Лесно извикване на имейли / Блокиране на измамни имейли по теми и други / Изтриване на дублирани имейли / подробно търсене / Консолидиране на папки ...
📁 Прикачени файлове Pro: Пакетно запазване / Партидно отделяне / Партиден компрес / Автоматично запазване / Автоматично отделяне / Автоматично компресиране ...
🌟 Магия на интерфейса: 😊 Още красиви и готини емотикони / Увеличете продуктивността на Outlook с изгледи с раздели / Минимизирайте Outlook, вместо да затваряте ...
???? Чудеса с едно кликване: Отговорете на всички с входящи прикачени файлове / Антифишинг имейли / 🕘Показване на часовата зона на подателя ...
👩🏼🤝👩🏻 Контакти и календар: Групово добавяне на контакти от избрани имейли / Разделете група контакти на отделни групи / Премахнете напомнянията за рожден ден ...
Над 100 Характеристики Очаквайте вашето проучване! Щракнете тук, за да откриете повече.