Hoe verwijdert u alle bijlagen uit een e-mail in Outlook?

Normaal gesproken verwijdert u een bijlage tijdens het bekijken van een e-mail door er met de rechtermuisknop op te klikken en Bijlage verwijderen te selecteren. Maar wat als een e-mailbericht vol zit met bijlagen? Dan is het vervelend om ze allemaal één voor één te verwijderen. Gelukkig hebben we twee eenvoudige trucs voor u: zo verwijdert u in één keer alle bijlagen uit één e-mail — of zelfs uit meerdere e-mails tegelijk in Outlook.

Handmatig alle bijlagen uit één e-mailbericht verwijderen in Outlook
Alle bijlagen uit meerdere e-mailberichten verwijderen in Outlook met VBA-code
Verwijder eenvoudig alle bijlagen uit één of meerdere e-mails met Kutools voor Outlook

Handmatig alle bijlagen uit één e-mailbericht verwijderen in Outlook

Het is eenvoudig om alle bijlagen uit een geselecteerd e-mailbericht te verwijderen met de functie Bijlagen verwijderen in Outlook.

Stap 1: Selecteer het e-mailbericht waarvan u de bijlagen later wilt verwijderen.

Stap 2: Klik op een van de bijlagen in het leesvenster om de Bijlagenhulpmiddelen te activeren.

Stap 3: Klik op de knop Alles selecteren in de groep Selectie op het tabblad Bijlagen.

Met deze stap selecteert u in één keer alle bijlagen van dit geselecteerde e-mailbericht.

Stap 4: Klik op de knop Bijlage verwijderen in de groep Acties op het tabblad Bijlagen.

Stap 5: Klik in het waarschuwingsvenster op de knop Bijlagen verwijderen.

Vervolgens worden alle bijlagen in dit geselecteerde e-mailbericht zo snel mogelijk verwijderd.

Opmerking: De functie Bijlagen verwijderen werkt uitstekend in Outlook 2010 en nieuwere versies, maar niet in Outlook 2007.

Alle bijlagen uit meerdere e-mailberichten verwijderen in Outlook met VBA-code

Als u alle bijlagen uit meerdere e-mailberichten in Microsoft Outlook wilt verwijderen, helpt de volgende methode u daarbij. We raden u aan om eerst alle macro's in uw Microsoft Outlook in te schakelen.

Stap 1: Ga naar de map Mijn documenten, maak een Nieuwe map aan en noem deze OLAttachments

Stap 2: Selecteer meerdere e-mailberichten waarvan u later de bijlagen wilt verwijderen.

Opmerking: U kunt niet-aaneengesloten e-mailberichten selecteren door de toets Ctrl ingedrukt te houden en te klikken.

U kunt aaneengesloten e-mailberichten selecteren door de Shift-toets ingedrukt te houden en te klikken.

Stap 3: Open de VBA-editor door tegelijkertijd op de toetsen Alt en F11 te drukken.

Stap 4: Vouw in de linkerbalk Project1 > Microsoft Outlook-objecten uit en dubbelklik vervolgens op ThisOutlookSession om deze in de editor te openen. Zie onderstaande screenshot:

Stap 5: Kopieer de volgende VBA-code en plak deze in het bewerkingsvenster.

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

Stap 6: Druk op de toets F5 om deze VBA-code uit te voeren.

Nu zijn alle bijlagen uit de geselecteerde e-mails verwijderd, met hyperlinks naar elke verwijderde bijlage onderaan de betreffende berichten.

Verwijder eenvoudig alle bijlagen uit één of meerdere e-mails met Kutools voor Outlook

Het hulpprogramma Alle loskoppelen voor bijlagen van Kutools voor Outlook verwijdert in een handomdraai alle bijlagen uit één of meerdere geselecteerde e-mails in Outlook. Volg deze stappen.

Kutools voor Outlook: met meer dan 100 handige Outlook-add-ins,30 dagen lang gratis en onbeperkt te proberen.

1. Selecteer één of meerdere e-mailberichten met de bijlagen die u wilt verwijderen en klik vervolgens op Kutools > Bijlagenhulpmiddelen > Alle loskoppelen. Zie screenshot:

2. In het venster Detachinstellingen configureert u het volgende.

• 2,1 Klik op de knop Bladeren om alle verwijderde bijlagen op te slaan in de map ‘Selecteer een map’.
• 2,2 Standaard is het selectievakje Detach bijlagen met de volgende stijl aangevinkt. Kies een optie om bijlagen op te slaan in verschillende mappen, afhankelijk van de e-mails, zoals u dat nodig heeft.
• 2,3 Klik op de knop OK. Zie de screenshot:

3. Klik op de knop Ja in het dialoogvenster Alle loskoppelen.

4. Vervolgens verschijnt een Kutools voor Outlook-dialoogvenster met de melding hoeveel bijlagen zijn verwijderd. Klik op de knop OK.

Nu zijn alle bijlagen direct verwijderd, met alleen de hyperlinks achtergelaten in de geselecteerde e-mails. Klik op een hyperlink om de bijbehorende bijlage te openen wanneer u die nodig heeft.

---

Beste Office-productiviteitstools

Beleef de gloednieuwe Kutools voor Outlook met 100+ ongelooflijke functies!Klik nu om te downloaden!

🤖KUTOOLS AI:Gebruikt geavanceerde AI-technologie om e-mails moeiteloos te verwerken, waaronder beantwoorden, samenvatten, optimaliseren, uitbreiden, vertalen en opstellen van e-mails.

📧E-mailautomatisering: Automatisch antwoorden (beschikbaar voor POP en IMAP), e-mails plannen om te verzenden, automatisch CC/BCC toepassen op basis van regels bij het verzenden van e-mails, automatisch doorsturen (geavanceerde regels), automatisch een begroeting toevoegen en e-mails met meerdere ontvangers automatisch splitsen in afzonderlijke berichten…

📨E-mailbeheer: E-mail terughalen, spam-e-mails blokkeren op basis van onderwerp en andere criteria, dubbele e-mails verwijderen, geavanceerd zoeken en mappen organiseren…

📁Bijlagen Pro: Batch opslaan, batch loskoppelen, batch comprimeren, automatisch opslaan, automatisch loskoppelen en automatisch comprimeren…

🌟Interface-magie: 😊 Nog meer mooie en coole emoji’s / Waarschuwt u bij binnenkomst van belangrijke e-mails / Minimaliseert Outlook in plaats van het programma te sluiten...

👍Eénklikwonderen: Antwoord Allen met Bijlagen / Anti-phishing-e-mails / 🕘Huidige tijd van afzender-zone weergeven...

👩🏼‍🤝‍👩🏻Contacten & agenda: Batch Contact toevoegen vanuit geselecteerde e-mails / Een contactgroep splitsen in afzonderlijke groepen / Verjaardagsherinnering verwijderen…

Gebruik Kutools in uw voorkeurstaal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en meer dan 40 andere talen!

Ontgrendel Kutools voor Outlook direct met één klik! Wacht niet langer—download nu en verhoog uw efficiëntie!

Functielijst van Kutools voor Outlook      Nu downloaden      Naar aankoop gaan

🚀 Eénklikdownload — Ontvang alle Office-invoegtoepassingen

Sterk aanbevolen: Kutools for Office (5-in-1)

Eén klik om vijf installatiebestandentegelijk te downloaden —Kutools voor Excel, Outlook, Word, PowerPointen Office Tab Pro.Klik nu om te downloaden!

• ✅Eénkliksgemak: Download alle vijf installatiepakketten in één keer.
• 🚀Klaar voor elke Office-taak: Installeer de invoegtoepassingen die u nodig heeft, precies op het moment dat u ze nodig heeft.
• 🧰Inbegrepen: Kutools voor Excel / Kutools voor Outlook / Kutools voor Word / Office Tab Pro / Kutools for PowerPoint

Over het pakket⬇ Download het pakket💳 Koop het pakket