Hoe verwijder ik alle bijlagen uit e-mail in Outlook?

Normaal gesproken kunt u, wanneer u een voorbeeld van een e-mail bekijkt, een bijlage verwijderen door met de rechtermuisknop te klikken en de Bijlage verwijderen item. Soms kan een e-mailbericht veel bijlagen bevatten, en het zal vervelend zijn om ze een voor een te verwijderen. Hier regelen we u met twee eenvoudige trucs om alle bijlagen in één e-mail te verwijderen en ook alle bijlagen uit meerdere e-mails in Outlook te verwijderen.

Verwijder handmatig alle bijlagen in één e-mailbericht in Outlook
Verwijder alle bijlagen van meerdere e-mailberichten in Outlook met VBA-code
Verwijder eenvoudig alle bijlagen van een of meerdere e-mails met Kutools voor Outlook

Verwijder handmatig alle bijlagen in één e-mailbericht in Outlook

Het is gemakkelijk om alle bijlagen in geselecteerde e-mailberichten te verwijderen met de Bijlagen verwijderen functie 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 Alles selecteren knop in de Selectie groep op de Bijlages Tab.

Met deze stap kunt u alle bijlagen in deze geselecteerde e-mailberichten in één keer selecteren.

Stap 4: klik op de Bijlage verwijderen knop in de Acties groep op de Bijlages Tab.

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

Vervolgens worden alle bijlagen in deze geselecteerde e-mailberichten zo snel mogelijk verwijderd.

Note: De functie Bijlagen verwijderen werkt prima in Outlook 2010 en de latere versie, maar niet in Outlook 2007.

Verwijder alle bijlagen van meerdere e-mailberichten in Outlook met VBA-code

Als u alle bijlagen van meerdere e-mailberichten in Microsoft Outlook wilt verwijderen, helpt de volgende methode u dit gemakkelijk te doen. We raden je aan schakel alle macro's in uw Microsoft Outlook in in de eerste plaats.

Stap 1: Ga naar de map van Mijn document, maak een nieuwe map en noem deze als OLA-bijlagen

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

Opmerking: U kunt niet-opeenvolgende e-mailberichten selecteren door de Ctrl toets en klikken.

U kunt opeenvolgende e-mailberichten selecteren door de Shift toets en klikken.

Stap 3: Open de VBA-editor door op de te drukken anders toets en F11 toets op hetzelfde moment.

Stap 4: Vouw het Project1 > Microsoft Outlook-objecten in de linkerbalk en dubbelklik vervolgens op het DezeOutlookSessie om het te openen in de Editor. Zie volgende schermafbeelding:

Stap 5: Kopieer en plak de volgende VBA-code 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 van F5 om deze VBA-code uit te voeren.

Nu worden alle bijlagen van geselecteerde e-mailberichten verwijderd, waarbij onder aan alle geselecteerde e-mailberichten hyperlinks naar elke verwijderde bijlage achterblijven.

Verwijder eenvoudig alle bijlagen van een of meerdere e-mails met Kutools voor Outlook

De Alles loskoppelen bijlagen hulpprogramma van Kutools for Outlook kan snel alle bijlagen verwijderen van een of meerdere geselecteerde e-mails in Outlook. Ga als volgt te werk.

Kutools for Outlook : met meer dan 100 handige Outlook-invoegtoepassingen, gratis te proberen zonder beperking in 60 dagen.

1. Selecteer een of meerdere e-mailberichten met de bijlagen die u wilt verwijderen en klik op Kutools > Hulpmiddelen voor bijlagen > Alles loskoppelen. Zie screenshot:

2. In de Instellingen loskoppelen dialoogvenster, configureer dan als volgt.

• 2.1 Klik op de Blader om een ​​map te selecteren om alle verwijderde bijlagen op te slaan.
• 2.2 Standaard is het Maak de bevestiging (en) los in onderstaande stijl vakje is aangevinkt, kies een optie om de bijlagen in verschillende mappen op te slaan op basis van e-mails zoals je nodig hebt.
• 2.3 Klik op de OK knop. Zie screenshot:

3. Klik op het Ja knop in de Alles loskoppelen dialoog venster.

4. Vervolgens een Kutools for Outlook Er verschijnt een dialoogvenster om u te vertellen hoeveel bijlagen zijn verwijderd. Klik op het OK knop. 

Nu worden alle bijlagen onmiddellijk verwijderd en blijven alleen de hyperlinks in geselecteerde e-mails achter. U kunt op de hyperlink klikken om de bijbehorende bijlage naar behoefte te openen.

---

Beste Office-productiviteitstools

Kutools for Outlook - Meer dan 100 krachtige functies om uw Outlook een boost te geven

🤖 AI Mail-assistent: Directe professionele e-mails met AI-magie: met één klik geniale antwoorden, perfecte toon, meertalige beheersing. Transformeer e-mailen moeiteloos! ...

???? Email Automation: Niet aanwezig (beschikbaar voor POP en IMAP)  /  Plan het verzenden van e-mails  /  Automatische CC/BCC volgens regels bij het verzenden van e-mail  /  Automatisch doorsturen (geavanceerde regels)   /  Begroeting automatisch toevoegen   /  Splits e-mails van meerdere ontvangers automatisch op in individuele berichten ...

📨 email management: Gemakkelijk e-mails herinneren  /  Blokkeer zwendel-e-mails van onderwerpen en anderen  /  Verwijder dubbele e-mails  /  Uitgebreid Zoeken  /  Consolideer mappen ...

📁 Bijlagen Pro: Batch opslaan  /  Batch losmaken  /  Batchcompressie  /  Automatisch opslaan   /  Automatisch loskoppelen  /  Automatisch comprimeren ...

???? Interface-magie: 😊Meer mooie en coole emoji's   /  Verhoog uw Outlook-productiviteit met weergaven met tabbladen  /  Minimaliseer Outlook in plaats van te sluiten ...

???? Wonderen met één klik: Beantwoord iedereen met inkomende bijlagen  /   Antiphishing-e-mails  /  🕘Toon de tijdzone van de afzender ...

👩🏼‍🤝‍👩🏻 Contacten en agenda: Batchcontacten toevoegen uit geselecteerde e-mails  /  Splits een contactgroep in individuele groepen  /  Verwijder verjaardagsherinneringen ...

Over 100 Eigenschappen Wacht op je verkenning! Klik hier om meer te ontdekken.

Lees meer       Gratis download      Koop nu jouw