Как отправить электронное письмо из ограниченного диапазона ячеек в Excel?
Часто вам может потребоваться делиться важными данными или отчетами с другими пользователями прямо из вашего Рабочая книга Excel, и включение определенного диапазона ячеек в тело письма экономит время и гарантирует точность. Например, отправка выбранных финансовых сводок, оценок студентов или данных об остатках товаров по электронной почте прямо из Excel позволяет получателям сразу видеть ключевую информацию без необходимости открывать вложение. В этой статье описаны практические методы отправки электронного письма с встроенным Выберите диапазон в теле сообщения, что поможет вам оптимизировать обмен данными и коммуникацию прямо из Excel.
Отправка электронной почты из Ограниченный диапазон ячеек в Excel
Отправка электронной почты из Ограниченный диапазон ячеек с помощью мощного инструмента
Дополнительные руководства по работе с почтой в Excel…
Отправка электронной почты из Ограниченный диапазон ячеек в Excel
Если вы предпочитаете встроенный и гибко настраиваемый подход, код VBA в Excel станет эффективным решением для копирования выбранного диапазона ячеек и автоматической вставки его в тело письма Outlook. Этот метод идеально подходит пользователям, которые регулярно работают с Microsoft Outlook в качестве почтового клиента и хотят автоматизировать отправку писем прямо из Excel. Ниже приведено пошаговое руководство:
1. Откройте лист, содержащий диапазон ячеек, который вы хотите вставить в письмо. Одновременно нажмите Alt + F11, чтобы открыть окно Microsoft Visual Basic для приложений. Эта комбинация клавиш мгновенно перенесёт вас в редактор VBA, куда вы сможете вставить код.
2. В окне редактора VBA выберите в меню Сервис > Ссылки. Убедитесь, что выбран нужный файл, особенно если у вас открыто несколько книг.
3. В диалоговом окне Ссылки – VBAProject прокрутите список и установите флажок рядом с пунктом Библиотека объектов Microsoft Outlook. Активация этой ссылки позволяет VBA взаимодействовать с Outlook, давая возможность создавать и отправлять письма напрямую. После установки флажка нажмите ОК.
4. В строке меню выберите Вставка > Модуль, чтобы добавить новый модуль кода. Затем скопируйте и вставьте приведённый ниже код VBA в окно модуля.
Код VBA: Отправка электронной почты с Ограниченный диапазон в Excel
Sub Send_Email()
'Updated by Extendoffice 20200119
Dim xRg As Range
Dim I, J As Long
Dim xAddress As String
Dim xEmailBody As String
Dim xMailOut As Outlook.MailItem
Dim xOutApp As Outlook.Application
On Error Resume Next
xAddress = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select range you need to paste into email body", "KuTools For Excel", xAddress, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
Set xOutApp = CreateObject("Outlook.Application")
Set xMailOut = xOutApp.CreateItem(olMailItem)
For I = 1 To xRg.Rows.Count
For J = 1 To xRg.Columns.Count
xEmailBody = xEmailBody & " " & xRg.Cells(I, J).value
Next
xEmailBody = xEmailBody & vbNewLine
Next
xEmailBody = "Hi" & vbLf & vbLf & " body of message you want to add" & vbLf & vbLf & xEmailBody & vbNewLine
With xMailOut
.Subject = "Test"
.To = "happy.xuebi@163.com"
.Body = xEmailBody
.Display
'.Send
End With
Set xMailOut = Nothing
Set xOutApp = Nothing
Application.ScreenUpdating = True
End SubПримечания:
- 1). Вы можете настроить содержимое и приветствие в строке xEmailBody = "Hi" & vbLf & vbLf & " body of message you want to add" & vbLf & vbLf & xEmailBody & vbNewLine по своему усмотрению. Например, добавьте конкретное сообщение или инструкции перед данными из Excel.
- 2). Настройте получателя и тему, изменив следующие строки: .To = happy.xuebi@163.com и .Subject = "Test". Обязательно укажите корректный адрес электронной почты получателя, чтобы избежать проблем с доставкой.
5. Чтобы запустить код, нажмите в редакторе VBA клавишу F5. Когда появится диалоговое окно Kutools для Excel, выберите диапазон ячеек, который нужно включить в тело письма, и нажмите ОК. Если выделили не тот диапазон — не беда: просто повторите процесс или скорректируйте выделение.
6. Автоматически создаётся письмо в Outlook с указанным получателем, темой, вставленным сообщением и данными из Excel в теле письма. Перед отправкой обязательно проверьте письмо, чтобы убедиться, что все данные отображаются корректно. Нажмите кнопку Отправить, чтобы отправить письмо.
Примечание: Данный метод VBA работает только при условии, что Microsoft Outlook установлен и настроен в качестве основного почтового клиента. Если вы используете другие почтовые программы, воспользуйтесь альтернативным решением, описанным ниже. Кроме того, если Outlook не запущен, макрос автоматически запустит его.
Ограничения: Требуется наличие Outlook и соответствующих разрешений для доступа к функциям электронной почты. Если ваша организация ограничивает использование макросов или доступ к Outlook, этот метод может не подойти.
Отправка электронной почты из Ограниченный диапазон ячеек с помощью мощного инструмента
Для пользователей, которые не используют Outlook или ищут более простой способ отправки писем без написания кода, Kutools для Excel предлагает удобное решение — отправку электронных сообщений с выбранными диапазонами ячеек. Функция «Отправить письмо» в Kutools позволяет настроить исходящий SMTP-сервер и отправлять письма через любую поддерживаемую почтовую учётную запись — будь то Gmail, Yahoo или корпоративная почта — прямо из Excel. Благодаря этому она становится универсальным инструментом для работы в разных условиях и идеально подходит для рассылки информации нескольким получателям.
Чтобы использовать этот метод, выполните следующие шаги:
1. Сначала подготовьте список писем, включив все необходимые поля.
- Совет: Ваш список писем должен содержать как минимум две строки: одну для заголовков и одну или несколько — для фактических данных. Например, если вы отправляете письма двум людям, укажите оба адреса электронной почты под заголовком «Email», как показано на скриншоте ниже.
- Если вы хотите быстро создать список писем, воспользуйтесь функцией Создать список рассылки для автоматической настройки.
2. Далее выделите нужный диапазон ячеек в Excel, который хотите вставить в тело письма, и нажмите Ctrl + C, чтобы скопировать его. Копируйте только необходимые ячейки — это поможет сохранить письмо чётким и понятным.
3. Выделите весь список писем (включая заголовки) и перейдите в KUTOOLS PLUS > Отправить письма.
4. Появится диалоговое окно «Отправить письма», в котором поля будут автоматически заполнены на основе выбранного вами списка писем.
- 4,1) При необходимости просмотрите и скорректируйте элементы в диалоговом окне. Вы можете добавить дополнительные поля в Список писем, если нужно персонализированное сообщение или дополнительная информация.
- 4,2) Щелкните внутри поля «Тело письма» и нажмите Ctrl + V, чтобы вставить скопированный диапазон. При необходимости добавьте пояснения или инструкции, чтобы письмо получилось понятным и информативным.
- 4,3) Убедитесь, что флажок «Отправить с помощью Outlook» снят (не установлен), если вы планируете отправлять письма через SMTP (с использованием других почтовых служб).
- 4,4) Нажмите Параметры SMTP, чтобы настроить параметры SMTP вашей учетной записи электронной почты — это необходимо для прямой отправки писем с аккаунтов, не связанных с Outlook.
5. В диалоговом окне «Настройки почтового сервера (SMTP – Новая схема)» заполните все необходимые данные: укажите свой адрес электронной почты, SMTP-сервер, номер порта и учетные данные для аутентификации. Вы также можете выбрать папку для сохранения отправленных писем, установив флажок «Сохранить отправленные письма в», — это поможет вам легко отслеживать переписку. После завершения настройки нажмите ОК, чтобы подтвердить.
6. Вы вернётесь в окно «Отправить письма». Внимательно проверьте все поля и вставленное содержимое на точность, затем нажмите Отправить, чтобы отправить письмо. Письмо будет отправлено через настроенный сервер прямо из Excel, и вы увидите подтверждение или статус в зависимости от результата.
Преимущества: Kutools позволяет отправлять электронные письма практически с любой учётной записи, поддерживающей SMTP, — не только через Outlook. Это делает его идеальным решением для пользователей веб-почты, тех, кто работает с несколькими доменами, и всех, кто ищет удобный интерфейс без необходимости писать макросы.
При использовании Kutools внимательно проверяйте настройки сервера, чтобы избежать ошибок отправки. Если письма не отправляются, убедитесь в наличии подключения к сети и проверьте адрес сервера, порт и учётные данные для входа.
Перед отправкой массовой рассылки обязательно предварительно просмотрите хотя бы одно сообщение, чтобы вовремя устранить возможные проблемы с отображением или персонализацией.
См. также:
Отправка электронной почты на адреса, указанные в ячейках Excel
Допустим, у вас есть список адресов электронной почты, и вы хотите отправить сообщения на эти адреса массово прямо из Excel. Как это сделать? В этой статье описаны способы отправки писем нескольким адресатам, чьи адреса электронной почты указаны в ячейках Excel.
Добавление подписи Outlook при отправке электронной почты из Excel
Представьте, что вы хотите отправить письмо прямо из Excel. Как добавить в него стандартную подпись Outlook? В этой статье мы расскажем о двух простых способах, которые помогут вам автоматически включать подпись Outlook при отправке писем из Excel.
Отправка электронной почты с несколькими вложениями из Excel
В этой статье рассказывается, как отправить письмо через Outlook с несколькими вложениями прямо из Excel.
Отправка электронной почты, если условие «Срок выполнения» выполнено в Excel
Например, если значение в столбце C превышает срок выполнения не более чем на 7 дней (текущая дата — 13,09.2017), отправьте напоминание по электронной почте получателю из столбца A с текстом из столбца B. Как этого добиться? В этой статье подробно описан метод с использованием VBA для решения этой задачи.
Автоматическая отправка электронной почты на основе значения ячейки в Excel
Предположим, вы хотите автоматически отправлять письмо через Outlook определённому получателю, когда значение ячейки в Excel достигает заданного условия. Например, если значение в ячейке D7 на листе превышает 200, письмо создаётся и отправляется автоматически. В этой статье описан метод VBA, который поможет вам быстро реализовать эту задачу.
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек