Note: The other languages of the website are Google-translated. Back to English

Wie behalte ich Anhänge bei der Beantwortung in Outlook?

Wenn wir eine E-Mail-Nachricht in Microsoft Outlook weiterleiten, bleiben die ursprünglichen Anhänge in dieser E-Mail-Nachricht in der weitergeleiteten Nachricht erhalten. Wenn wir jedoch eine E-Mail-Nachricht beantworten, werden die ursprünglichen Anhänge nicht an die neue Antwortnachricht angehängt. Hier werden einige Tricks zum Beibehalten der ursprünglichen Anhänge beim Antworten in Microsoft Outlook vorgestellt.

Antworten Sie mit Anhängen, indem Sie sie manuell kopieren und einfügen
Antworten Sie automatisch mit Anhängen von VBA
Ein Klick, um mit Anhängen mit Kutools for Outlook zu antworten


Antworten Sie mit Anhängen, indem Sie sie manuell kopieren und einfügen

Wir können Originalanhänge manuell in eine E-Mail-Nachricht kopieren und sie in das Fenster "Antwortnachricht" einfügen, wenn wir die E-Mail-Nachricht später beantworten.

Schritt 1: Klicken Sie auf die E-Mail-Nachricht, um eine Vorschau im Lesebereich anzuzeigen.

Schritt 2: Klicken Sie mit der rechten Maustaste auf einen Anhang in der Vorschau der E-Mail-Nachricht und wählen Sie die Option aus Alle auswählen aus dem Kontextmenü.

Schritt 3: Klicken Sie mit der rechten Maustaste auf die ausgewählten Anhänge und wählen Sie die aus Kopieren aus dem Kontextmenü.

Schritt 4: Beantworten Sie die E-Mail-Nachricht mit einem Klick auf antworten Taste auf der Home Registerkarte (oder in der Symbolleiste in Outlook 2007).

Schritt 5: Klicken Sie im Fenster Antwortnachricht auf Pasta Taste auf der Nachricht Registerkarte, um diese Anhänge einzufügen.

Wenn Sie Outlook 2013 oder eine neuere Version verwenden, klicken Sie auf Herausspringen in der oberen linken Ecke des Lesebereichs, um das Fenster für die Antwortnachricht freizugeben. Klicken Sie hier, um mehr zu erfahren…

Schritt 6: Verfassen Sie die Antwortnachricht und klicken Sie auf Absenden .


Beantworten Sie E-Mails ganz einfach mit Originalanhängen in Outlook:

Kutools for Outlook's Antworte mit Anhang Mit dem Dienstprogramm können Sie eine empfangene E-Mail problemlos mit den Originalanhängen in Outlook beantworten. Siehe die folgende Demo: 
Laden Sie es herunter und probieren Sie es jetzt aus! (60 Tage kostenloser Trail)


Antworten Sie automatisch mit Anhängen von VBA 

Es gibt ein VBA-Makro, mit dem Sie automatisch mit Originalanhängen antworten können.

Hinweis: Bevor Sie VBA-Makros ausführen, müssen Sie dies tun Aktivieren Sie Makros in Microsoft Outlook.

Schritt 1: Wählen Sie die E-Mail-Nachricht aus, die Sie mit den Anhängen beantworten möchten.

Schritt 2: Drücken Sie die Taste Andere + F11 Tasten zum Öffnen des Fensters Microsoft Visual Basic für Applikationen.

Schritt 3: Erweitern Sie die Project1- und Microsoft Outlook-Objekte in der linken Leiste und doppelklicken Sie auf DieseOutlookSession um es zu öffnen.

Schritt 4: Fügen Sie den folgenden Code in das Fenster ThisOutlookSession ein.

Sub RunReplyWithAttachments()
'Update by Extendoffice 20180830
    Dim xReplyItem As Outlook.MailItem
    Dim xItem As Object
    On Error Resume Next
    Set xItem = GetCurrentItem()
    If xItem Is Nothing Then Exit Sub
    Set xReplyItem = xItem.Reply
    CopyAttachments xItem, xReplyItem
    xReplyItem.Display
    Set xReplyItem = Nothing
    Set xItem = Nothing
End Sub
Sub RunReplyAllWithAttachments()
    Dim xReplyAllItem As Outlook.MailItem
    Dim xItem As Object
    Set xItem = GetCurrentItem()
    If xItem Is Nothing Then Exit Sub
    Set xReplyAllItem = xItem.ReplyAll
    CopyAttachments xItem, xReplyAllItem
    xReplyAllItem.Display
    Set xReplyAllItem = Nothing
    Set xItem = Nothing
End Sub
    
Function GetCurrentItem() As Object
    On Error Resume Next
    Select Case TypeName(Application.ActiveWindow)
        Case "Explorer"
            Set GetCurrentItem = Application.ActiveExplorer.Selection.Item(1)
        Case "Inspector"
            Set GetCurrentItem = Application.ActiveInspector.currentItem
    End Select
End Function
    
Sub CopyAttachments(SourceItem As MailItem, TargetItem As MailItem)
    Dim xFilePath As String
    Dim xAttachment As Attachment
    Dim xFSO As Scripting.FileSystemObject
    Dim xTmpFolder As Scripting.Folder
    Dim xFldPath As String
    Set xFSO = New Scripting.FileSystemObject
    Set xTmpFolder = xFSO.GetSpecialFolder(2)
    xFldPath = xTmpFolder.Path & "\"
    For Each xAttachment In SourceItem.Attachments
        If IsEmbeddedAttachment(xAttachment) = False Then
            xFilePath = xFldPath & xAttachment.Filename
            xAttachment.SaveAsFile xFilePath
            TargetItem.Attachments.Add xFilePath, , , xAttachment.DisplayName
            xFSO.DeleteFile xFilePath
        End If
    Next
    Set xFSO = Nothing
    Set xTmpFolder = Nothing
End Sub

Function IsEmbeddedAttachment(Attach As Attachment)
    Dim xAttParent As Object
    Dim xCID As String, xID As String
    Dim xHTML As String
    On Error Resume Next
    Set xAttParent = Attach.Parent
    xCID = ""
    xCID = Attach.PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x3712001F")
    If xCID <> "" Then
        xHTML = xAttParent.HTMLBody
        xID = "cid:" & xCID
        If InStr(xHTML, xID) > 0 Then
            IsEmbeddedAttachment = True
        Else
            IsEmbeddedAttachment = False
        End If
    End If
End Function

Schritt 5: Drücken Sie die Taste F5 Schlüssel zum Ausführen dieses Makros. In der Eröffnung Makros Dialogfeld, klicken Sie auf Führen Sie ReplyAllWithAttachments aus wenn Sie allen mit Anhängen antworten möchten. Andernfalls wählen Sie RunReplyWithAnhänge, klicken Sie dann auf die Run .

Anschließend wird das Fenster "Antwortnachricht" geöffnet, in dem alle Originalanhänge angehängt werden.

Schritt 6: Verfassen Sie die Antwortnachricht und klicken Sie auf Absenden .


Antworten Sie mit Anhängen automatisch mit Kutools for Outlook

Das Antworte mit Anhängen Nutzen von Kutools for Outlook kann Ihnen helfen, E-Mails mit Originalanhängen mit nur einem Klick zu beantworten.

Kutools for Outlook : mit mehr als 100 praktischen Outlook-Add-Ins, Kostenlos ohne Einschränkung in 60 Tagen zu versuchen.

1. Wählen Sie die E-Mail mit den Anhängen aus, mit denen Sie antworten müssen.

2. Dann klick Kutoolen > Antworte mit Anhang > Antworte mit Anhang. Siehe Screenshot:

Anschließend werden alle Anhänge der ausgewählten E-Mail in der Liste aufgeführt Beigefügt Feld der Antwortnachricht. Verfassen Sie Ihre E-Mail und senden Sie sie.

Wenn Sie dieses Dienstprogramm kostenlos testen möchten, gehen Sie zu Laden Sie die Software kostenlos herunter Wenden Sie zuerst die Operation gemäß den obigen Schritten an.


Ein Klick, um mit Anhängen mit Kutools for Outlook zu antworten

  Wenn Sie eine kostenlose Testversion (60 Tage) dieses Dienstprogramms wünschen, Bitte klicken Sie, um es herunterzuladenund wenden Sie dann die Operation gemäß den obigen Schritten an.


In Verbindung stehende Artikel:


Kutools für Outlook - Bringt 100 erweiterte Funktionen in Outlook und erleichtert die Arbeit erheblich!

  • Auto CC / BCC nach Regeln beim Versenden von E-Mails; Automatische Weiterleitung Mehrere E-Mails nach Kundenwunsch; Automatische Antwort ohne Exchange Server und mehr automatische Funktionen ...
  • BCC-Warnung - Nachricht anzeigen, wenn Sie versuchen, alle zu beantworten wenn Ihre E-Mail-Adresse in der BCC-Liste enthalten ist; Bei fehlenden Anhängen erinnernund weitere Erinnerungsfunktionen ...
  • Antwort (Alle) mit allen Anhängen in der E-Mail-Konversation; Viele E-Mails beantworten in Sekunden; Begrüßung automatisch hinzufügen bei der Antwort; Datum zum Betreff hinzufügen ...
  • Anhang Tools: Alle Anhänge in allen Mails verwalten, Automatische Trennung, Alle komprimieren, Alle umbenennen, Alle speichern ... Schnellbericht, Ausgewählte Mails zählenrealisieren kannst...
  • Leistungsstarke Junk-E-Mails nach Brauch; Entfernen Sie doppelte E-Mails und Kontakterealisieren kannst... Ermöglichen Sie es Ihnen, in Outlook intelligenter, schneller und besser zu arbeiten.
Schuss Kutools Outlook Kutools Tab 1180x121
Schuss Kutools Outlook Kutools plus Tab 1180x121
 
Kommentare (24)
Noch keine Bewertungen. Bewerten Sie als Erster!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Team, er hat eine Möglichkeit, dieses Makro mit einigen Tastenkombinationen in Outlook auszuführen.
Rituraj Sharma
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ja. Unter den Hauptoptionen können Sie einen Entwickler-Tab hinzufügen, auf dem Sie die Makros finden. Und, noch besser, wenn Sie mit der rechten Maustaste auf den Streifen oben mit allen Schaltflächen klicken, dies wird als "Band" bezeichnet, können Sie eine benutzerdefinierte neue Gruppe hinzufügen und Ihre Makros als Schaltflächen direkt dort auf der Registerkarte "Startseite" anzeigen.
mr
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ich versuche, die Antwort mit Anhängen zu verwenden, aber es fügt den Anhang nicht hinzu, sondern behält nur den Link bei. Ich verwende die automatische Trennung, wenn eine E-Mail empfangen wird. Gibt es eine Konfigurationseinstellung, die ich aktualisieren muss? Danke für deine Hilfe!
Susan Landes
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Liebe Susan,

Die Anhänge finden sich nicht mehr in der E-Mail, da sie automatisch von der E-Mail getrennt werden. Bitte schalten Sie die Funktion zum automatischen Trennen aus, um diese Funktion „Mit Anhang antworten“ verwenden zu können.

Beste Grüße, Kristall.
Kristall
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Wie schalte ich die Funktion zum automatischen Trennen aus?
Dakota
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Liebe Dakota,

Wenn Sie die Funktion „Alle empfangenen Anhänge automatisch trennen“ von Kutools für Outlook verwenden, gehen Sie bitte wie im folgenden Screenshot gezeigt vor, um diese Funktion zu deaktivieren, indem Sie sie in Ihrem Outlook deaktivieren. Danke!
Kristall
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ich habe die Registerkarte Kutools heruntergeladen. Kann ich die „Antwort mit Anhang“ zu meiner Registerkarte „Startseite“ oder zu „Quick Steps“ hinzufügen?
Jim
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Lieber Jim,
Sie können mit der rechten Maustaste auf die Schaltfläche „Mit Anhang antworten“ klicken und „Zur Symbolleiste für den Schnellzugriff hinzufügen“ auswählen, um diese Funktion zur Symbolleiste für den Schnellzugriff in der Multifunktionsleiste hinzuzufügen. Siehe Screenshot:
Kristall
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Im letzten Teil des Skripts sind viele der Variablen nicht definiert.
NMGMarken
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ich habe VBA-Code verwendet, aber er wird mit allen Bildern (.gif, jpg, ...) im E-Mail-Inhalt angehängt. Bitte zeigen Sie mir, wie Sie dieses Problem lösen können.
Nhan Nguyen Tuan
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Guten Tag,
Der Code wird in der Post aktualisiert. Das Problem ist jetzt gelöst. Bitte versuchen Sie es und danke für Ihren Kommentar.
Kristall
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Sehr schön, danke, aber ich habe einen Compilerfehler: Benutzerdefinierter Typ nicht definiert. Dort ist Dim xFSO As Scripting.FileSystemObject im Teil Sub CopyAttachments hervorgehoben
Jack
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Honza,
Der Code funktioniert in meinem Fall gut. Welche Office-Version verwendest du?
Kristall
Dieser Kommentar wurde vom Moderator auf der Website minimiert
ich auch. Ich habe das Problem mit den gleichen Leuten oben. Ich verwende Office 2016.
Hien
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ich benutze Office 365 mit dem gleichen Fehler
Rob
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Bob,
Bitte versuche:
1. Drücken Sie die Tasten Alt + F11, um das Microsoft Visual Basic for Applications-Fenster erneut zu öffnen;
2. Klicken Sie auf Extras > Referenzen und aktivieren Sie das Kontrollkästchen Microsoft Scripting Runtime.
Jetzt kann der Code funktionieren.
Kristall
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Das löst es für mich!

Vielen Dank.
httan
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hi!

Vielen Dank für so ein tolles Tool!

Kann der Befehl so ausgeführt werden, dass das Antwortfenster nicht erscheint, sondern in der Lesebereichsansicht bleibt?
Alexey
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Alexey,
Wir haben eine neue Version mit aktualisiertem Tool veröffentlicht. Danke für Ihre Unterstützung.
Kristall
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Kristall!

Danke für Update!
hatte sich der Makrocode geändert oder würde es nur mit installiertem Tool funktionieren?
Alexey
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Alexey,
Der Code wird allein verwendet, ohne dass das Tool installiert ist.
Kristall
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hi
Ich werde den Code verwenden, um allen mit Anhängen in den Suchergebnissen von All Mailboxes zu antworten, aber es zeigt mir einen Fehler und funktioniert nicht.
Bitte teilen Sie mir mit, wie ich den Code ändern kann, damit er für alle Postfächer verwendet werden kann.

Freundliche Grüße
Shahrooz
Shahrooz Bral
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo,
Der Fehler wird nicht durch die Suche verursacht.
Um den Fehler zu vermeiden, klicken Sie bitte auf Extras > Verweise, um das Dialogfeld Verweise zu öffnen, und aktivieren Sie dann die Option Microsoft Scripting Runtime. Siehe das beigefügte Bild für die Schritte.
Kristall
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo, ich verwende Ihren Code für die Antwort, was großartig ist. Vielen Dank, dass Sie ihn zur Verfügung gestellt haben. Ich habe meine E-Mail-Optionen so eingestellt, dass Kommentare mit meinen Initialen eingeleitet werden, was funktioniert, wenn ich die Standardantwort verwende. Wenn ich mit diesem Code eine Antwort erstelle, werden meine Initialen nicht eingefügt. Können Sie mir bitte helfen? Danke, Steve
Steve
Es sind noch keine Kommentare vorhanden
Hinterlassen Sie Ihre Kommentare
Als Gast posten
×
Bewerte diese Nachricht:
0  Figuren
Vorgeschlagene Standorte