Zum Hauptinhalt springen

Wie erhalten Sie eine E-Mail-Benachrichtigung, wenn ein Empfänger Ihren Excel-Anhang öffnet?

Author: Xiaoyang Last Modified: 2025-05-28

Wenn Sie wichtige Informationen in einer Excel-Datei als Anhang versenden, kann es hilfreich sein zu wissen, ob der Empfänger die Datei geöffnet hat. Mit VBA können Sie einen Code erstellen, der automatisch eine E-Mail-Benachrichtigung an Sie sendet, sobald der Empfänger die Arbeitsmappe öffnet. Dieser Leitfaden zeigt Ihnen, wie Sie diese Funktion in Excel einrichten, sodass Sie immer dann eine Bestätigung erhalten, wenn auf die angehängte Datei zugegriffen wird.

E-Mail-Benachrichtigung auslösen, wenn ein Excel-Anhang mit VBA-Code geöffnet wird


arrow blue right bubble E-Mail-Benachrichtigung auslösen, wenn ein Excel-Anhang mit VBA-Code geöffnet wird

Hinweis: Diese Methode ist nur verfügbar, wenn Sie Outlook als Ihr E-Mail-Programm verwenden.

Bevor Sie diese Excel-Datei senden, sollten Sie einen Code wie folgt erstellen:

1. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

2. Doppelklicken Sie dann auf ThisWorkbook im Abschnitt VBAProject, um ein leeres Modul zu öffnen, und kopieren Sie den folgenden Code in das Modul:

VBA-Code: Senden Sie eine E-Mail, wenn 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

Screenshot of the pasted code in the VBA window in Excel

Hinweis: Im obigen Code sollten Sie die E-Mail-Adresse durch Ihre eigene Adresse ersetzen, an die Sie die Benachrichtigungs-E-Mail erhalten möchten, und ändern Sie den Betreff entsprechend Ihren Bedürfnissen.

3. Speichern Sie diese Arbeitsmappe dann im Dateityp „Excel-Makrofähige Arbeitsmappe“, siehe Screenshot:

Screenshot showing how to save the workbook as an Excel Macro-Enabled Workbook

4. Senden Sie anschließend eine Nachricht mit diesem Dateianhang an die gewünschten Empfänger. Wenn die Empfänger die Excel-Datei herunterladen und öffnen und der Code aktiviert wird, wird Ihnen automatisch eine E-Mail gesendet, die Ihnen mitteilt, wer die Datei geöffnet hat, wie im folgenden Screenshot dargestellt:

Screenshot showing an email received when the file is opened by a recipient

Beste Büroproduktivitätswerkzeuge

🤖 Kutools AI-Assistent: Revolutionieren Sie die Datenanalyse basierend auf: Intelligente Ausführung   |  Code generieren  |  Benutzerdefinierte Formeln erstellen  |  Daten analysieren und Diagramme generieren  |  Erweiterte Funktionen aufrufen
Beliebte Funktionen: Finden, Hervorheben oder Doppelte markieren   |  Leere Zeilen löschen   |  Spalten oder Zellen kombinieren ohne Datenverlust   |   Runden ...
Erweiterte SVERWEIS: Mehrfachkriterien SVERWEIS    Mehrfachwert SVERWEIS  |   Mehrblatt-SVERWEIS   |   Fuzzy Match ....
Erweiterte Dropdown-Liste: Schnell Dropdown-Liste erstellen   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl Dropdown-Liste ....
Spaltenmanager: Eine bestimmte Anzahl von Spalten hinzufügen  |  Spalten verschieben  |  Sichtbarkeitsstatus ausgeblendeter Spalten umschalten  |  Bereiche & Spalten vergleichen ...
Hervorgehobene Funktionen: Gitterfokus   |  Entwurfsansicht   |   Erweiterte Formelleiste    Arbeitsmappe & Arbeitsblatt-Manager   |  AutoText-Bibliothek (Auto Text)   |  Datumsauswahl   |  Daten zusammenführen   |  Zellen verschlüsseln/entschlüsseln    E-Mail senden nach Liste   |  Spezialfilter   |   Spezialfilter (Filtern fett/kursiv/durchgestrichen...) ...
Top15 Werkzeugsets12 Textwerkzeuge (Text hinzufügen, Bestimmte Zeichen löschen, ...)   |   50+ Diagramm typen (Gantt-Diagramm, ...)   |   40+ Praktische Formeln (Alter basierend auf dem Geburtsdatum berechnen, ...)   |   19 Einfügewerkzeuge (QR-Code einfügen, Bild aus Pfad einfügen, ...)   |   12 Konvertierungswerkzeuge (In Wörter umwandeln, Währungsumrechnung, ...)   |   7 Konsolidieren & Aufteilen Werkzeuge (Erweiterte Zeilen zusammenführen, Zellen aufteilen, ...)   |   ... und mehr

Verbessern Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über300 erweiterte Funktionen zur Steigerung der Produktivität und Zeitersparnis.  Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...


Office Tab bringt eine Registerkartenoberfläche zu Office und macht Ihre Arbeit viel einfacher

  • Aktivieren Sie die Bearbeitung und das Lesen mit Registerkarten in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters, anstatt in neuen Fenstern.
  • Steigert Ihre Produktivität um50 % und reduziert täglich hunderte von Mausklicks für Sie!