Zum Hauptinhalt springen

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

Author: Xiaoyang Last Modified: 2025-08-06

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

Die besten Office-Produktivitätstools

🤖 Kutools AI Aide: Revolutionieren Sie die Datenanalyse basierend auf: Intelligente Ausführung |  Code generieren  |  Benutzerdefinierte Formeln erstellen |  Daten analysieren und Diagramme generieren  |  Erweiterte Funktionen aufrufen
Beliebte Funktionen: Doppelte suchen, hervorheben oder markieren | Leere Zeilen löschen | Spalten oder Zellen ohne Datenverlust zusammenführen | Runden
Erweiterte SVERWEIS: SVERWEIS mit mehreren Kriterien | SVERWEIS für mehrere Werte | Mehrblatt-SVERWEIS | Fuzzy Match
Erweiterte Dropdown-Liste: Dropdown-Liste schnell erstellen | Abhängige Dropdown-Liste | Mehrfachauswahl-Dropdown-Liste
Spalten-Manager: Eine bestimmte Anzahl an Spalten hinzufügen | Spalten verschieben | Sichtbarkeit von ausgeblendeten Spalten umschalten | Bereiche & Spalten vergleichen
Hervorgehobene Funktionen: Gitterfokus | Entwurfsansicht | Erweiterte Formelleiste | Arbeitsmappen- & Blattmanager | AutoText-Bibliothek | Datumsauswahl | Daten zusammenführen | Zellen verschlüsseln/entschlüsseln | E-Mail senden nach Liste | Super Filter | Spezialfilter (Filtern nach Fett/Kursiv/Durchgestrichen...)…
Top15 Toolsets:12 Text-Tools (Text hinzufügen, Bestimmte Zeichen löschen, ...) | 50+ Diagramm typen (Gantt-Diagramm, ...) | 40+ praktische Formeln (Alter basierend auf dem Geburtsdatum berechnen, ...) | 19 Einfüge-Tools (QR-Code einfügen, Bild aus Pfad einfügen, ...) | 12 Konvertierungs-Tools (In Wörter umwandeln, Währungsumrechnung, ...) | 7 Konsolidieren & Aufteilen-Tools (Erweiterte Zeilen zusammenführen, Zellen aufteilen, ...) | ... und mehr
Nutzen Sie Kutools in Ihrer bevorzugten Sprache – unterstützt Englisch, Spanisch, Deutsch, Französisch, Chinesisch und über40 weitere Sprachen!

Steigern Sie Ihre Excel-Kompetenz mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über300 erweiterte Funktionen, um Ihre Produktivität zu steigern und Zeit zu sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...


Office Tab bringt die Reiter-Oberfläche in Office und macht Ihre Arbeit so viel einfacher

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