Как получать уведомление по электронной почте, когда получатель открывает вложение Excel?
При отправке важной информации в виде вложения в файл Excel может быть полезно знать, открыл ли получатель файл. С помощью VBA вы можете создать код, который будет автоматически отправлять вам уведомление по электронной почте, как только получатель откроет книгу. Это руководство покажет вам, как настроить эту функцию в Excel, что позволит вам получать подтверждение при каждом доступе к вложенному файлу.
Запуск уведомления по электронной почте при открытии вложения Excel с помощью кода VBA
Запуск уведомления по электронной почте при открытии вложения Excel с помощью кода VBA
Примечание: Этот метод доступен только при использовании Outlook в качестве почтовой программы.
Перед отправкой этого файла Excel вы должны создать следующий код:
1. Удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. Затем дважды щелкните Эта рабочая тетрадь под ВБАПроект раздел, чтобы открыть пустой модуль, а затем скопируйте и вставьте в модуль следующий код:
Код VBA: отправьте электронное письмо при открытии файла Excel:
Private Sub Workbook_Open()
'Updateby Extendoffice
Dim olkObj As Object
Dim olkEm As Object
Dim strbody As String
Set olkObj = CreateObject("Outlook.Application")
Set olkEm = olkObj.CreateItem(0)
strbody = "Hi there" & vbNewLine & vbNewLine & _
ThisWorkbook.Name & vbNewLine & _
"was opened by" & vbNewLine & _
Environ("username")
On Error Resume Next
With olkEm
.To = ""
.CC = ""
.BCC = ""
.Subject = "File opened"
.Body = strbody
.Send
End With
On Error GoTo 0
Set olkEm = Nothing
Set olkObj = Nothing
End Sub
Внимание: В приведенном выше коде вы должны изменить адрес электронной почты на свой собственный адрес, на который вы хотите получать приглашение по электронной почте, и изменить тему по своему усмотрению.
3. Затем сохраните эту книгу как Excel Macro-Enabled Workbook формат файла, см. снимок экрана:
4. А затем отправьте сообщение с этим вложенным файлом нужным получателям, когда получатели загрузят и откроют этот файл Excel и активируют код, вам будет автоматически отправлено электронное письмо с подсказкой, в котором сообщается, что файл был открыт кем-то следующим образом показан снимок экрана:
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!