Wie entferne ich alle Anhänge aus einer E-Mail in Outlook?
Normalerweise können Sie beim Vorschauen einer E-Mail einen Anhang durch Rechtsklick löschen und die Option „Anhang entfernen“ auswählen. Manchmal kann eine E-Mail viele Anhänge enthalten, und es wäre mühsam, diese einzeln zu entfernen. Hier zeigen wir Ihnen zwei einfache Tricks, um alle Anhänge in einer E-Mail zu entfernen und auch alle Anhänge aus mehreren E-Mails in Outlook zu löschen.
Manuelles Entfernen aller Anhänge in einer E-Mail in Outlook
Alle Anhänge aus mehreren E-Mails in Outlook mit VBA-Code entfernen
Alle Anhänge ganz einfach aus einer oder mehreren E-Mails mit Kutools für Outlook entfernen
Manuelles Entfernen aller Anhänge in einer E-Mail in Outlook
Es ist einfach, alle Anhänge in einer ausgewählten E-Mail mit der Funktion „Anhänge entfernen“ in Outlook zu löschen.
Schritt 1: Wählen Sie die E-Mail aus, deren Anhänge Sie später entfernen möchten.
Schritt 2: Klicken Sie auf einen der Anhänge im Lesebereich, um die Anhangswerkzeuge zu aktivieren.
Schritt 3: Klicken Sie auf die Schaltfläche Alle auswählen in der Gruppe Auswahl auf der Registerkarte Anhänge.
Dieser Schritt ermöglicht es Ihnen, alle Anhänge in dieser ausgewählten E-Mail auf einmal auszuwählen.
Schritt 4: Klicken Sie auf die Schaltfläche Anhang entfernen in der Gruppe Aktionen auf der Registerkarte Anhänge.
Schritt 5: Klicken Sie im Warnungsdialogfeld auf die Schaltfläche Anhänge entfernen.
Dann werden alle Anhänge in dieser ausgewählten E-Mail so schnell wie möglich gelöscht.
Hinweis: Die Funktion „Anhänge entfernen“ funktioniert gut in Outlook 2010 und höher, aber nicht in Outlook 2007.
Alle Anhänge ganz einfach aus mehreren ausgewählten E-Mails in Outlook entfernen:
Mit dem Alle Anhänge abtrennen Dienstprogramm von Kutools für Excel können Sie ganz einfach alle Anhänge aus mehreren ausgewählten E-Mails entfernen, wie in der folgenden Demo gezeigt. (Die Anhänge werden in einen bestimmten Ordner gespeichert) Jetzt herunterladen und ausprobieren! (30-Tage kostenlose Testversion)
Alle Anhänge aus mehreren E-Mails in Outlook mit VBA-Code entfernen
Wenn Sie alle Anhänge aus mehreren E-Mails in Microsoft Outlook entfernen möchten, hilft Ihnen die folgende Methode dabei, dies ganz einfach zu tun. Wir empfehlen Ihnen, zunächst alle Makros in Ihrem Microsoft Outlook zu aktivieren.
Schritt 1: Gehen Sie zum Ordner „Eigene Dokumente“, erstellen Sie einen neuen Ordner und benennen Sie ihn als OLAttachments.
Schritt 2: Wählen Sie mehrere E-Mails aus, deren Anhänge Sie später entfernen möchten.
Hinweis: Sie können nicht aufeinanderfolgende E-Mails auswählen, indem Sie die Strg-Taste gedrückt halten und klicken.
Sie können aufeinanderfolgende E-Mails auswählen, indem Sie die Umschalttaste gedrückt halten und klicken.
Schritt 3: Öffnen Sie den VBA-Editor, indem Sie gleichzeitig die Alt-Taste und die F11-Taste drücken.
Schritt 4: Erweitern Sie Projekt1 > Microsoft Outlook-Objekte in der linken Leiste und doppelklicken Sie dann auf DieseOutlookSitzung, um sie im Editor zu öffnen. Siehe folgenden Screenshot:
Schritt 5: Kopieren und fügen Sie den folgenden VBA-Code in den Bearbeitungsbereich ein.
Public Sub ReplaceAttachmentsToLink()
Dim objApp As Outlook.Application
Dim aMail As Outlook.MailItem 'Object
Dim oAttachments As Outlook.Attachments
Dim oSelection As Outlook.Selection
Dim i As Long
Dim iCount As Long
Dim sFile As String
Dim sFolderPath As String
Dim sDeletedFiles As String
' Get the path to your My Documents folder
sFolderPath = CreateObject("WScript.Shell").SpecialFolders(16)
On Error Resume Next
' Instantiate an Outlook Application object.
Set objApp = CreateObject("Outlook.Application")
' Get the collection of selected objects.
Set oSelection = objApp.ActiveExplorer.Selection
' Set the Attachment folder.
sFolderPath = sFolderPath & "\OLAttachments"
' Check each selected item for attachments. If attachments exist,
' save them to the Temp folder and strip them from the item.
For Each aMail In oSelection
' This code only strips attachments from mail items.
' If aMail.class=olMail Then
' Get the Attachments collection of the item.
Set oAttachments = aMail.Attachments
iCount = oAttachments.Count
If iCount > 0 Then
' We need to use a count down loop for removing items
' from a collection. Otherwise, the loop counter gets
' confused and only every other item is removed.
For i = iCount To 1 Step -1
' Save attachment before deleting from item.
' Get the file name.
sFile = oAttachments.Item(i).FileName
' Combine with the path to the Temp folder.
sFile = sFolderPath & "\" & sFile
' Save the attachment as a file.
oAttachments.Item(i).SaveAsFile sFile
' Delete the attachment.
oAttachments.Item(i).Delete
'write the save as path to a string to add to the message
'check for html and use html tags in link
If aMail.BodyFormat <> olFormatHTML Then
sDeletedFiles = sDeletedFiles & vbCrLf & "<file://" & sFile & ">"
Else
sDeletedFiles = sDeletedFiles & "<br>" & "<a href='file://" & _
sFile & "'>" & sFile & "</a>"
End If
Next i
'End If
' Adds the filename string to the message body and save it
' Check for HTML body
If aMail.BodyFormat <> olFormatHTML Then
aMail.Body = aMail.Body & vbCrLf & _
"The file(s) were saved to " & sDeletedFiles
Else
aMail.HTMLBody = aMail.HTMLBody & "<p>" & _
"The file(s) were saved to " & sDeletedFiles & "</p>"
End If
aMail.Save
'sets the attachment path to nothing before it moves on to the next message.
sDeletedFiles = ""
End If
Next 'end aMail
ExitSub:
Set oAttachments = Nothing
Set aMail = Nothing
Set oSelection = Nothing
Set objApp = Nothing
End Sub
Schritt 6: Drücken Sie die Taste F5, um diesen VBA-Code auszuführen.
Jetzt werden alle Anhänge aus den ausgewählten E-Mails entfernt, wobei Hyperlinks zu jedem gelöschten Anhang am Ende aller ausgewählten E-Mails verbleiben.
Alle Anhänge ganz einfach aus einer oder mehreren E-Mails mit Kutools für Outlook entfernen
Das Dienstprogramm „Alle Anhänge abtrennen“ von Kutools für Outlook kann schnell alle Anhänge aus einer oder mehreren ausgewählten E-Mails in Outlook entfernen. Bitte gehen Sie wie folgt vor.
Kutools für Outlook : Mit über 100 praktischen Outlook-Add-ins, kostenlos testen ohne Einschränkungen für 30 Tage.
1. Wählen Sie eine oder mehrere E-Mails mit den Anhängen aus, die Sie entfernen möchten, und klicken Sie dann auf Kutools > Anhangswerkzeuge > Alle abtrennen. Siehe Screenshot:
2. Konfigurieren Sie im Dialogfeld „Einstellungen für das Ablösen“ bitte wie folgt.
- 2.1 Klicken Sie auf die Schaltfläche Durchsuchen, um einen Ordner auszuwählen, in dem alle gelöschten Anhänge gespeichert werden sollen.
- 2.2 Standardmäßig ist das Kontrollkästchen „Anhänge mit dem folgenden Stil ablösen“ aktiviert. Wählen Sie eine Option, um die Anhänge je nach Bedarf in verschiedene Ordner basierend auf E-Mails zu speichern.
- 2.3 Klicken Sie auf die Schaltfläche OK. Siehe Screenshot:
3. Klicken Sie auf die Schaltfläche Ja im Dialogfeld „Alle abtrennen“.
4. Dann wird ein Dialogfeld von Kutools für Outlook angezeigt, das Ihnen mitteilt, wie viele Anhänge gelöscht wurden. Klicken Sie bitte auf die Schaltfläche OK.
Jetzt werden alle Anhänge sofort entfernt, und es verbleiben nur die Hyperlinks in den ausgewählten E-Mails. Sie können auf den Hyperlink klicken, um bei Bedarf den entsprechenden Anhang zu öffnen.
Wenn Sie eine kostenlose Testversion (30-Tage) dieses Dienstprogramms nutzen möchten, klicken Sie bitte hier, um es herunterzuladen, und gehen Sie dann gemäß den oben genannten Schritten vor, um die Operation anzuwenden.
Beste Office-Produktivitätstools
Eilmeldung: Kutools für Outlook startet kostenlose Version!
Erleben Sie das komplett neue Kutools für Outlook mit über100 beeindruckenden Funktionen! Jetzt herunterladen!
📧 E-Mail-Automatisierung: Automatische Antwort (verfügbar für POP und IMAP) /E-Mails zeitgesteuert senden /Automatische CC/BCC nach Regel beim Senden von E-Mails /Automatische Weiterleitung (Erweiterte Regeln) /Automatisches Hinzufügen von Begrüßungen / Mehrfache Empfänger-E-Mails automatisch in einzelne E-Mail-Nachrichten aufteilen...
📨 E-Mail-Verwaltung: E-Mails zurückrufen /Betrugsversuche anhand des Betreffs und anderer Kriterien blockieren /Duplikate E-Mails löschen /Erweiterte Suche /Ordner organisieren...
📁 Anhänge Pro:Stapelweise speichern /Stapelweise abtrennen /Stapelweise komprimieren /Automatisch speichern /Automatisch abtrennen/Automatische Komprimierung...
🌟 Interface-Magie: 😊Mehr attraktive und coole Emojis /Benachrichtigung bei wichtigen E-Mails /Outlook minimieren statt schließen...
👍 Ein-Klick-Wunder: Allen mit Anhängen antworten /Anti-Phishing-E-Mails /🕘Zeitzone des Absenders anzeigen...
👩🏼🤝👩🏻 Kontakte & Kalender: Kontakte stapelweise aus ausgewählten E-Mails hinzufügen /Eine Kontaktgruppe in einzelne Gruppen aufteilen /Geburtstagserinnerung entfernen...
Verwenden Sie Kutools in Ihrer bevorzugten Sprache – unterstützt Englisch, Spanisch, Deutsch, Französisch, Chinesisch und über40 weitere!

