Как да приложа бутон за изпращане на имейл с прикачен текущ Word файл?
Ако трябва да изпратите имейл съобщение от документ на Word чрез Outlook и да прикачите и текущия файл на Word, можете да създадете команден бутон и след това да изпратите съобщението, като щракнете върху този бутон, без да отваряте Outlook. В тази статия ще ви представя как да се справите с него бързо и лесно.
Приложете бутон за изпращане на имейл с прикачен текущия Word файл
Приложете бутон за изпращане на имейл с прикачен текущия Word файл
Моля, изпълнете следните стъпки за решаване на тази задача в Word файл:
1. Първо, трябва да създадете команден бутон, моля щракнете Софтуерен Инженер > Наследени инструменти > Команден бутон (ActiveX Control), вижте екранна снимка:
2. Изберете бутона и щракнете Имоти под Софтуерен Инженер в раздела Имоти прозорец, въведете текста на надписа, от който се нуждаете, в Надпис поле, вижте екранната снимка:
3. След това затворете Имоти панел, сега щракнете с десния бутон върху бутона и изберете Преглед на кода, вижте екранна снимка:
4. И след това, в показаното Microsoft Visual Basic за приложения прозорец, копирайте и поставете кода по-долу между оригиналните скриптове, вижте екранната снимка:
Dim xOutlookObj As Object
Dim xEmail As Object
Dim xDoc As Document
Application.ScreenUpdating = False
Set xOutlookObj = CreateObject("Outlook.Application")
Set xEmail = xOutlookObj.CreateItem(olMailItem)
Set xDoc = ActiveDocument
xDoc.Save
With xEmail
.Subject = "Fax-data"
.Body = "This is a test email."
.To = ""
.Importance = olImportanceNormal
.Attachments.Add xDoc.FullName
.Display
End With
Set xDoc = Nothing
Set xEmail = Nothing
Set xOutlookObj = Nothing
Application.ScreenUpdating = True
Забележка: В горния код трябва да промените темата, основния текст или изпратения адрес според вашите нужди.
5. След това запазете и затворете този код, щракнете Режим на проектиране за да изключите режима на проектиране. Сега, когато щракнете върху командния бутон, който сте създали, ще бъде създаден имейл с текущия документ на Word като прикачен файл, вижте екранната снимка:
6. Най-накрая просто трябва да щракнете Изпрати бутон, за да изпратите това съобщение.
Най-добрите инструменти за продуктивност в офиса
Kutools за Word - Подобрете своя Word опит с Over 100 Забележителни функции!
🤖 Kutools AI Assistant: Преобразувайте писането си с AI - Генериране на съдържание / Пренаписване на текст / Обобщаване на документи / Запитване за информация въз основа на Документ, всичко това в Word
📘 Владеене на документи: Разделяне на страници / Обединяване на документи / Експортиране на селекция в различни формати (PDF/TXT/DOC/HTML...) / Пакетно конвертиране в PDF / Експортиране на страници като изображения / Отпечатайте няколко файла наведнъж...
✏ Редактиране на съдържанието: Пакетно намиране и замяна в множество файлове / Преоразмеряване на всички снимки / Транспониране на редовете и колоните на таблицата / Преобразуване на таблица в текст...
🧹 Почистване без усилие: Изметете Допълнителни пространства / Прекъсвания на раздели / Всички заглавки / Текстови полета / Хипервръзки / За повече инструменти за премахване се насочете към нашия Премахване на група...
➕ Творчески вложки: Вмъкване Хилядни разделители / Квадратчета / Радио бутони / QR Code / Баркод / Таблица с диагонални линии / Надпис на уравнение / Надпис на изображението / Надпис на таблица / Множество снимки / Открийте повече в Вмъкване на група...
🔍 Прецизни селекции: Точна точка конкретни страници / таблици / форми / заглавни параграфи / Подобрете навигацията с още Изберете функции...
⭐ Звездни подобрения: Навигирайте бързо до всяко място / автоматично вмъкване на повтарящ се текст / безпроблемно превключване между прозорците на документи / 11 Инструменти за конвертиране...