Wie erhalten Sie eine E-Mail-Benachrichtigung, sobald ein Empfänger Ihren Excel-Anhang geöffnet hat?
Beim Versand wichtiger Informationen als Excel-Dateianhang kann es äußerst hilfreich sein, zu wissen, ob der Empfänger die Datei tatsächlich geöffnet hat. Mit VBA lässt sich ein Code erstellen, der automatisch eine E-Mail-Benachrichtigung an Sie versendet, sobald die Arbeitsmappe geöffnet wird. In dieser Anleitung zeigen wir Ihnen Schritt für Schritt, wie Sie diese Funktion in Excel einrichten – so erhalten Sie jedes Mal eine Bestätigung, sobald auf die angehängte Datei zugegriffen wird.
Lösen Sie mithilfe von VBA-Code eine E-Mail-Benachrichtigung aus, sobald ein Excel-Anhang geöffnet wird
Hinweis: Diese Methode steht nur zur Verfügung, wenn Sie Outlook als Ihr E-Mail-Programm verwenden.
Bevor Sie diese Excel-Datei versenden, sollten Sie folgenden Code erstellen:
1. Halten Sie die ALT + F11-Tasten gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Doppelklicken Sie anschließend im Abschnitt VBAProjekt auf DieseArbeitsmappe, um ein leeres Modul zu öffnen, und fügen Sie dann den folgenden Code in das Modul ein:
VBA-Code: Senden einer E-Mail, sobald die Excel-Datei geöffnet wird:
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
Hinweis: Ersetzen Sie im obigen Code „E-Mail-Adresse“ durch Ihre eigene Adresse, an die Sie die Benachrichtigungs-E-Mail erhalten möchten, und passen Sie den Betreff entsprechend Ihren Anforderungen an.
3. Speichern Sie diese Arbeitsmappe anschließend als Excel-Arbeitsmappe mit Makros aktiviert-Dateityp, siehe Screenshot:
4. Senden Sie danach die Datei mit einer Nachricht an Ihre gewünschten Empfänger. Sobald diese die Excel-Datei herunterladen, öffnen und den Code aktivieren, erhalten Sie automatisch eine Benachrichtigungs-E-Mail – mit der Information, wer die Datei geöffnet hat, wie im folgenden Screenshot dargestellt:
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins