Як застосувати кнопку для надсилання електронного листа із вкладеним поточним файлом Word?
Якщо вам потрібно надіслати повідомлення електронної пошти з документа Word через Outlook, а також приєднати поточний файл Word, ви можете створити командну кнопку, а потім надіслати повідомлення, натиснувши цю кнопку, не відкриваючи Outlook. У цій статті я розповім, як швидко і легко з цим боротися.
Застосуйте кнопку, щоб надіслати електронний лист із доданим поточним файлом Word
Застосуйте кнопку, щоб надіслати електронний лист із доданим поточним файлом Word
Будь ласка, виконайте такі дії для вирішення цієї роботи у файлі Word:
1. По-перше, вам слід створити командну кнопку, натисніть, будь ласка Розробник > Спадкові інструменти > Кнопка керування (керування ActiveX), див. скріншот:
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: змініть свій текст за допомогою ШІ - Створення вмісту / Переписати текст / Узагальнити документи / Звертайтеся за інформацією на основі Документа, все в Word
📘 Майстерність документів: Розділити сторінки / Об’єднати документи / Експортувати вибране в різні формати (PDF/TXT/DOC/HTML...) / Пакетне перетворення в PDF / Експортувати сторінки як зображення / Друк кількох файлів одночасно...
✏ Редагування змісту: Пакетний пошук та заміна між кількома файлами / Змінити розмір усіх зображень / Транспонування рядків і стовпців таблиці / Перетворити таблицю в текст...
🧹 Очищення без зусиль: Змітати Зайві простори / Розбиття розділів / Усі заголовки / Текстові поля / Гіперпосилання / Щоб отримати більше інструментів для видалення, відвідайте наш сайт Вилучити групу...
➕ Творчі вставки: Вставити Роздільники тисяч / Прапорці / радіо кнопки / QR-код / Штрих-код / Таблиця діагональних ліній / Заголовок рівняння / Підпис зображення / Заголовок таблиці / Кілька зображень / Дізнайтеся більше в Вставити групу...
???? Точність вибору: Точне визначення конкретні сторінки / Таблиці / форми / заголовок абзаців / Покращте навігацію за допомогою більше Виберіть функції...
⭐ Покращення зірок: Швидка навігація до будь-якого місця / автоматичне вставлення повторюваного тексту / плавно перемикатися між вікнами документів / 11 Інструменти перетворення...