Как применить кнопку для отправки электронного письма с вложенным текущим файлом Word?

Если вам нужно отправить электронное письмо из документа Word, используя Outlook, и прикрепить текущий файл Word, вы можете вставить командную кнопку, которая отправляет письмо одним щелчком — не нужно вручную открывать Outlook. Это руководство показывает, как быстро и легко настроить этот процесс.

Примените кнопку для отправки электронного письма с вложенным текущим файлом Word

Примените кнопку для отправки электронного письма с вложенным текущим файлом Word

Пожалуйста, следуйте этим шагам, чтобы выполнить задачу в вашем документе Word:

1. Сначала вставьте командную кнопку. Перейдите в раздел «Разработчик» > «Устаревшие инструменты» > «Кнопка команды (Элемент управления ActiveX)».

   Примечание: Если вы не видите вкладку «Разработчик» на ленте, посетите: Как показать вкладку Разработчик на ленте Word.

   

2. Выберите кнопку, затем нажмите «Свойства» под вкладкой «Разработчик». В панели свойств введите текст, который вы хотите отобразить на кнопке, в поле «Заголовок».

   

3. Закройте панель свойств. Затем щелкните правой кнопкой мыши по кнопке и выберите «Просмотреть код».

   

4. В окне «Microsoft Visual Basic for Applications» вставьте следующий код между существующими тегами подпрограммы:

   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 = "yy@addin99.com"
       .Importance = olImportanceNormal
       .Attachments.Add xDoc.FullName
       .Display
   End With
   Set xDoc = Nothing
   Set xEmail = Nothing
   Set xOutlookObj = Nothing
   Application.ScreenUpdating = True

   

   Примечание: Вы можете изменить тему, содержание тела письма и адрес электронной почты получателя в коде, чтобы они соответствовали фактическим деталям вашего сообщения.

5. Сохраните и закройте редактор VBA. Нажмите «Режим конструктора» на вкладке «Разработчик», чтобы отключить его. Теперь, когда вы нажимаете командную кнопку, электронное письмо автоматически создается в Outlook с прикрепленным текущим документом Word.

   

6. Наконец, нажмите кнопку «Отправить» в Outlook, чтобы отправить сообщение.

Лучшие инструменты для повышения производительности в офисе

Kutools for Word — Поднимите свой опыт работы с Word на новый уровень, используя более 100 впечатляющих функций!

🤖 Возможности ИИ Kutools: AI Ассистент / Ассистент в Реальном Времени / Супер Полировка (Сохраняет форматирование) / Супер Перевод (Сохраняет форматирование) / Искусственный интеллект для редактирования / Проверка с помощью ИИ...

📘 Мастерство работы с Документом: Разделить страницы / Объединить документы / Экспортировать диапазон в различные форматы (PDF/TXT/DOC/HTML...) / Пакетное преобразование в PDF...

✏ Редактирование текста сообщения: Пакетный поиск и замена в нескольких файлах / Изменить размер всех изображений / Транспонировать строки и столбцы таблицы / Преобразовать таблицу в текст...

🧹 Легкая очистка: Удалить лишние пробелы / Разрывы разделов / Текстовые поля / Гиперссылки / Для получения дополнительных инструментов удаления перейдите в группу Удалить...

➕ Креативные вставки: Вставить тысячные разделители / Флажки / Переключатели / QR-код / Штрихкод / Несколько изображений / Узнайте больше в группе Вставить...

🔍 Точные выделения: Определить конкретные страницы / Таблицы / Фигуры / Абзацы заголовков / Улучшайте навигацию с помощью дополнительных функций выбора...

⭐ Особые улучшения: Перейти к любому диапазону / Автоматическая вставка повторяющегося текста / Переключение между окнами документа /11 инструментов преобразования...

🌍 Поддержка более40 языков: Используйте Kutools на предпочитаемом языке — поддерживаются Английский, Испанский, Немецкий, Французский, Китайский и еще более40 языков!

👉 Хотите попробовать эти функции? Загрузите Kutools for Word сейчас! 🚀

Бесплатная загрузка     Купить     Подробнее о Kutools for Word

 

✨ Kutools for Office — Одна установка, пять мощных инструментов!

Включает Office Tab Pro · Kutools for Excel · Kutools for Outlook · Kutools for Word · Kutools for PowerPoint

📦 Получите все5 инструментов в одном пакете | 🔗 Бесшовная интеграция с Microsoft Office | ⚡ Мгновенно экономьте время и повышайте продуктивность

⬇️ Скачать сейчас 🎁 Купить полный комплект 📖 Подробнее

Лучшие инструменты для повышения производительности в офисе

Kutools for Word - 100+ инструментов для Word

• 🤖 Возможности ИИ Kutools: AI Ассистент / Ассистент в Реальном Времени / Супер Полировка / Супер Перевод / Искусственный интеллект для редактирования / Проверка с помощью ИИ
• 📘 Мастерство работы с Документом: Разделить страницы / Объединить документы / Пакетное преобразование в PDF
• ✏ Редактирование текста сообщения: Пакетный поиск и замена / Изменить размер всех изображений
• 🧹 Легкая очистка: Удалить лишние пробелы / Удалить разрывы разделов
• ➕ Креативные вставки: Вставить тысячные разделители / Вставить флажки / Создать QR-коды
• 🌍 Поддержка более40 языков: Kutools говорит на вашем языке — поддерживаются более40 языков!

Бесплатная загрузка Купить Подробнее о Kutools