Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Email aus Excel mit Lesebestätigung

Forumthread: Email aus Excel mit Lesebestätigung

Email aus Excel mit Lesebestätigung
16.08.2018 14:25:29
Alex
Guten Tag zusammen,
ich verschicke einen Teil aus einer Exceldatei per Email. Soweit klappt auch alles,
aber jetzt möchte ich dass auch automatisch eine Lesebestätigung angefordert wird.
Im Forum bin ich auf den Befehl
.ReadReceiptRequested = True '
gekommen. Der bringt mir aber einen Laufzeitfehler 438.
Kann mir jemand sagen was falsch läuft?
Hier der ganze Code:
Sheets("Checkliste").Select
ActiveSheet.Range("AA3:AK36").Select
ActiveWorkbook.EnvelopeVisible = True
With ActiveSheet.MailEnvelope
.Item.To = ActiveWorkbook.Sheets("checkliste").Range("D23").Text
.Item.Subject = "letzte Erinnerung!!"
.ReadReceiptRequested = True ' Lesebestätigung anfordern
.Item.Send
Vielen Dank im vor raus.
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Email aus Excel mit Lesebestätigung
16.08.2018 15:04:44
Klexy
.Item.ReadReceiptRequested
AW: Email aus Excel mit Lesebestätigung
16.08.2018 15:24:22
Alex
Mann bin ich blind. Vielen Dank :)
AW: Email aus Excel mit Lesebestätigung
16.08.2018 15:33:18
Alex
Gibt es da vielleicht auch einen Befehl der die gesendete Email automatisch auf Wiedervorlage heute +X Tage legt?
Anzeige
AW: Fehlt noch "End With" ...
16.08.2018 15:44:38
Dieter(Drummer)
Hallo Alex,
nach ".Item.ReadReceiptRequested" fehlt in nächster Zeile noch "End With".
Evtl. hast du das aber auch schon bemerkt.
Gruß, Dieter(Drummer)
AW: Email aus Excel mit Lesebestätigung
16.08.2018 17:00:44
Klexy
Da bin ich überfragt.
Aber kleiner Tip zur Lesebestätigung: die meisten Leute nervt das und wer weiß wie es geht, blockiert Lesebestätigungsanforderungen grundsätzlich:
Datei > Optionen > E-Mail > Verlauf > Nie eine Lesebestätigung senden
Anzeige
;
Anzeige

Infobox / Tutorial

Email aus Excel mit Lesebestätigung


Schritt-für-Schritt-Anleitung

Um eine Email aus Excel mit einer Lesebestätigung zu versenden, kannst Du den folgenden VBA-Code verwenden. Achte darauf, dass Du den Code in einem Modul in Excel einfügst und die Makros aktiviert sind.

Sub SendEmailWithReadReceipt()
    Sheets("Checkliste").Select
    ActiveSheet.Range("AA3:AK36").Select
    ActiveWorkbook.EnvelopeVisible = True

    With ActiveSheet.MailEnvelope
        .Item.To = ActiveWorkbook.Sheets("Checkliste").Range("D23").Text
        .Item.Subject = "letzte Erinnerung!!"
        .Item.ReadReceiptRequested = True ' Lesebestätigung anfordern
        .Item.Send
    End With
End Sub

Stelle sicher, dass Du nach .Item.ReadReceiptRequested den Befehl End With hinzufügst, um Laufzeitfehler zu vermeiden.


Häufige Fehler und Lösungen

  • Laufzeitfehler 438: Dieser Fehler tritt auf, wenn Du eine Methode oder Eigenschaft für ein Objekt verwendest, die nicht vorhanden ist. Achte darauf, dass Du nach der Zeile .Item.ReadReceiptRequested = True die Zeile End With einfügst.

  • Lesebestätigung wird nicht angefordert: Überprüfe die Einstellungen in Deinem Email-Client. Bei Outlook kann es sein, dass die Option für Lesebestätigungen in den Einstellungen deaktiviert ist.


Alternative Methoden

Wenn Du mit Outlook arbeitest, kannst Du auch manuell eine Lesebestätigung anfordern, indem Du in der Email-Komposition auf "Optionen" gehst und die Lesebestätigung aktivierst. Für AOL-Nutzer kann es hilfreich sein, die Lesebestätigung in den Einstellungen der AOL Mail zu konfigurieren.


Praktische Beispiele

Hier ist ein Beispiel, wie Du die Email mit Lesebestätigung für unterschiedliche Empfänger versenden kannst:

Sub SendEmailToMultipleRecipients()
    Dim recipients As Variant
    recipients = Array("empfaenger1@example.com", "empfaenger2@example.com")

    For Each recipient In recipients
        With ActiveSheet.MailEnvelope
            .Item.To = recipient
            .Item.Subject = "Wichtige Information"
            .Item.ReadReceiptRequested = True
            .Item.Send
        End With
    Next recipient
End Sub

Dieses Skript sendet die Email an mehrere Empfänger und fordert eine Lesebestätigung an.


Tipps für Profis

  • Wenn Du regelmäßig Emails mit Lesebestätigungen versendest, könntest Du eine Vorlage erstellen und diese in Deinen VBA-Projekten wiederverwenden.
  • Nutze die Funktion MailItem.Attachments.Add, um Dateien an die Emails anzuhängen, falls nötig.
  • Achte darauf, dass Du die richtige Version von Outlook verwendest und dass die Lesebestätigungen in den Optionen aktiviert sind.

FAQ: Häufige Fragen

1. Wie kann ich die Lesebestätigung in AOL Mail einstellen?
Gehe zu den Einstellungen in Deinem AOL-Konto und suche nach den Optionen für Lesebestätigungen. Stelle sicher, dass die richtige Einstellung aktiviert ist.

2. Funktioniert die Lesebestätigung in Outlook für alle Empfänger?
Nicht alle Email-Clients unterstützen Lesebestätigungen. Manche Empfänger können diese Option in ihren Einstellungen deaktiviert haben, was bedeutet, dass Du möglicherweise keine Bestätigung erhältst.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige