Direkt zum Inhalt

Wie antworte ich normal im Ordner für gesendete Elemente aus Outlook? 

Wenn Sie im Ordner "Gesendete Elemente" auf die Funktion "Antworten" klicken, um eine weitere zusätzliche Nachricht für die von Ihnen gesendeten Personen zu senden, wird normalerweise Ihre eigene E-Mail-Adresse im Feld "An" angezeigt (siehe folgenden Screenshot). Dies kann für Sie ärgerlich sein, wenn Sie die Adresse jedes Mal ändern. Wie kann Outlook die Adresse des ursprünglichen Empfängers verwenden, nicht Ihre?

doc Antwort gesendet E-Mails 1

Antworten Sie normalerweise im Ordner "Gesendete Objekte" aus Outlook mit der Funktion "Alle antworten"

Antworten Sie normalerweise im Ordner "Gesendete Objekte" aus Outlook mit VBA-Code


Antworten Sie normalerweise im Ordner "Gesendete Objekte" aus Outlook mit der Funktion "Alle antworten"

In Outlook wird die Allen antworten Die Funktion kann Ihnen bei der Lösung dieses Problems helfen. Gehen Sie wie folgt vor:

Wenn Sie die gesendete E-Mail zum erneuten Senden beantworten müssen, um die Adresse des ursprünglichen Empfängers beizubehalten, klicken Sie bitte auf Allen antworten Klicken Sie auf die Schaltfläche, und die Adresse des ursprünglichen Empfängers befindet sich unter Zu Feld wie folgt Screenshot gezeigt:

doc Antwort gesendet E-Mails 2


Antworten Sie normalerweise im Ordner "Gesendete Objekte" aus Outlook mit VBA-Code

Irgendwann können Sie das vergessen Allen antworten Funktion beim Beantworten der gesendeten Nachricht, sodass der folgende VBA-Code Ihnen helfen kann, mithilfe der Antwortfunktion normal im Ordner "Gesendete Objekte" zu antworten. Führen Sie die folgenden Schritte aus:

1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

2. In dem Microsoft Visual Basic für Applikationen Fenster, Doppelklick DieseOutlookSession von dem Projekt1 (VbaProject.OTM) Bereich, um den Modus zu öffnen, und kopieren Sie dann den folgenden Code und fügen Sie ihn in das leere Modul ein.

VBA-Code: Antworten Sie normalerweise im Ordner "Gesendete Objekte" aus Outlook:

Option Explicit
Private WithEvents GExplorer As Explorer
Private WithEvents GMailItem As MailItem
Private Sub Application_Startup()
    Set GExplorer = Application.ActiveExplorer
End Sub
Private Sub GExplorer_SelectionChange()
   On Error Resume Next
   Set GMailItem = GExplorer.Selection.Item(1)
End Sub
Private Sub GMailItem_Reply(ByVal Response As Object, Cancel As Boolean)
Dim xResponse As MailItem
Dim xRecipients As Outlook.Recipients
Dim xRecipient As Outlook.Recipient
Dim i As Integer
Dim xTo As String, xCC As String, xBCC As String, xName As String
On Error Resume Next
If Application.ActiveExplorer.CurrentFolder <> Session.GetDefaultFolder(olFolderSentMail) Then
    Exit Sub
End If
Cancel = True
Set xResponse = GMailItem.Reply
Set xRecipients = GMailItem.Recipients
For i = xRecipients.Count To 1 Step -1
    Set xRecipient = xRecipients.Item(i)
    xName = xRecipient.Name
    If Left(xName, 1) = "'" Then
        xName = Mid(xName, 2, Len(xRecipient.Name) - 2)
    End If
    Select Case xRecipient.Type
        Case olTo
            xTo = xName & ";" & xTo
        Case olCC
            xCC = xName & ";" & xCC
        Case olBCC
            xBCC = xName & ";" & xBCC
    End Select
Next
With xResponse
    .To = xTo
    .CC = xCC
    .BCC = xBCC
End With
xResponse.Recipients.ResolveAll
xResponse.Display
End Sub

doc Antwort gesendet E-Mails 3

3. Speichern Sie dann den Code und starten Sie Outlook neu, um den Codeeffekt jetzt beim Klicken zu erzielen antworten um eine E-Mail erneut zu senden Gesendete Objekte Ordner wird die Adresse des ursprünglichen Empfängers nach Bedarf im Feld An angezeigt.


Beste Office-Produktivitätstools

Kutools for Outlook - Über 100 leistungsstarke Funktionen zur Optimierung Ihres Outlooks

🤖 KI-Mail-Assistent: Sofortige Profi-E-Mails mit KI-Magie – geniale Antworten mit einem Klick, perfekter Ton, mehrsprachige Beherrschung. Verwandeln Sie den E-Mail-Versand mühelos! ...

📧 E-Mail Automation: Abwesenheit (verfügbar für POP und IMAP)  /  Planen Sie das Senden von E-Mails  /  Automatisches CC/BCC nach Regeln beim E-Mail-Versand  /  Automatische Weiterleitung (erweiterte Regeln)   /  Begrüßung automatisch hinzufügen   /  Teilen Sie E-Mails mit mehreren Empfängern automatisch in einzelne Nachrichten auf ...

📨 E-Mail-Management: E-Mails einfach abrufen  /  Blockieren Sie betrügerische E-Mails nach Betreff und anderen  /  Doppelte E-Mails löschen  /  Erweiterte Suche  /  Ordner konsolidieren ...

📁 Anhänge ProBatch speichern  /  Stapeltrennung  /  Stapelkomprimierung  /  Automatisches Speichern   /  Automatische Trennung  /  Automatische Komprimierung ...

???? Schnittstellenmagie: 😊Mehr hübsche und coole Emojis   /  Steigern Sie Ihre Outlook-Produktivität mit Registerkartenansichten  /  Ausblick minimieren statt schließen ...

👍 Wunder mit einem Klick: Allen mit eingehenden Anhängen antworten  /   Anti-Phishing-E-Mails  /  🕘Zeitzone des Absenders anzeigen ...

👩🏼‍🤝‍👩🏻 Kontakte und Kalender: Fügen Sie Kontakte aus ausgewählten E-Mails im Stapel hinzu  /  Teilen Sie eine Kontaktgruppe in einzelne Gruppen auf  /  Geburtstagserinnerungen entfernen ...

Auf über 100 Eigenschaften Warten Sie auf Ihre Erkundung! Klicken Sie hier, um mehr zu erfahren.

 

 

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations