Hoe kopieer je alle bijlagen van meerdere e-mails naar een nieuwe e-mail in Outlook?
Het efficiënt beheren van e-mailbijlagen in Outlook kan uitdagend zijn, vooral wanneer je bijlagen moet extraheren uit meerdere e-mails en ze moet samenvoegen in een nieuwe e-mail of alle bijlagen van een e-mail moet kopiëren naar een antwoord. Handmatig bestanden opslaan en opnieuw bijvoegen is niet alleen tijdrovend, maar ook foutgevoelig. Gelukkig zijn er twee effectieve manieren om deze taak te vereenvoudigen. Je kunt VBA gebruiken om bijlagen uit meerdere e-mails te extraheren en in een nieuwe e-mail in te voegen, hoewel dit enige technische kennis vereist. Voor een snellere en probleemloze oplossing biedt het hulpprogramma Kutools voor Outlook een een-klik optie om direct alle bijlagen van een e-mail naar een antwoord e-mail te kopiëren, waardoor het de meest efficiënte en gebruiksvriendelijke keuze wordt.
Kopieer alle bijlagen van meerdere e-mails naar een nieuwe e-mail met behulp van VBA (Handmatig en Technisch)
Kopieer alle bijlagen van een e-mail direct naar een antwoord e-mail met een geweldig hulpmiddel 👍 (Makkelijk en Aanbevolen)
Kopieer alle bijlagen van meerdere e-mails naar een nieuwe e-mail met behulp van VBA
Als je liever VBA gebruikt om het proces te automatiseren, kun je de volgende stappen volgen om snel alle bijlagen uit meerdere e-mails naar een nieuwe e-mail te extraheren en kopiëren.
Stap 1: Selecteer meerdere e-mails
Selecteer in Outlook de e-mails met bijlagen die je wilt kopiëren.
- Houd "Ctrl" ingedrukt om meerdere niet-aaneengesloten e-mails te selecteren.
- Houd "Shift" ingedrukt om een reeks van aangrenzende e-mails te selecteren.
Stap 2: Open de VBA-editor
Druk op "Alt" + "F11" om het venster "Microsoft Visual Basic for Applications" te openen.
Stap 3: Voeg de VBA-code in een nieuwe module in
Klik op "Invoegen" > "Module" om een nieuwe module te maken. Plak vervolgens de volgende VBA-code in het modulevenster:
VBA: Kopieer alle bijlagen van meerdere e-mails naar een nieuwe e-mail
Sub NewEmailInsertAttachmentsName()
Dim xSelection As Outlook.Selection
Dim xMailItem As Outlook.MailItem
Dim xAttachment As Outlook.Attachment
Dim xFSO As Object
Dim xFldPath As String
Dim xFilePath As String
Dim xNewMail As Outlook.MailItem
On Error Resume Next
Set xSelection = Outlook.Application.ActiveExplorer.Selection
Set xNewMail = Outlook.Application.CreateItem(olMailItem)
Set xFSO = CreateObject("Scripting.FileSystemObject")
xFldPath = xFSO.GetSpecialFolder(2).Path & "\MyAttachments"
If xFSO.FolderExists(xFldPath) = False Then
xFSO.CreateFolder (xFldPath)
End If
For Each xMailItem In xSelection
For Each xAttachment In xMailItem.Attachments
xFilePath = xFldPath & "\" & xAttachment.FileName
xAttachment.SaveAsFile (xFilePath)
xNewMail.Attachments.Add (xFilePath)
xFSO.DeleteFile (xFilePath)
Next
Next
xFSO.GetFolder(xFldPath).Delete
xNewMail.Display
End Sub
Stap 4: Voer de VBA-code uit
Druk op "F5" of klik op de knop Uitvoeren om de code uit te voeren. Er zal een nieuwe e-mail worden geopend, met alle bijlagen die zijn geëxtraheerd uit de geselecteerde e-mails.
Nadelen:
- ❌ Vereist VBA-kennis: Niet geschikt voor beginners en houdt in dat je met code moet werken.
- ❌ Handmatige instelling vereist: Je moet elke keer de VBA-editor openen, de code invoegen en uitvoeren.
- ❌ Potentiële beveiligingsbeperkingen: Sommige versies van Outlook blokkeren macro's vanwege beveiligingsbeleid.
- ❌ Geen flexibiliteit: Je moet het script telkens opnieuw uitvoeren wanneer je bijlagen wilt kopiëren.
📂 Bijlagen moeiteloos opslaan vanuit meerdere e-mails
Bent u het beu om bijlagen één voor één op te slaan in Outlook? Vereenvoudig uw workflow met Kutools voor Outlook! De krachtige functie 'Alles opslaan (Bijlagen)' stelt u in staat om bijlagen uit meerdere e-mails of hele mappen op te slaan met slechts een paar klikken. Zeg vaarwel tegen tijdrovende handmatige processen en neem moeiteloos de controle over uw inbox.
Kopieer alle bijlagen van een e-mail direct naar een antwoord e-mail met een geweldig hulpmiddel 👍
Voor een eenvoudigere en snellere oplossing kun je de functie Antwoorden met Originele Bijlage gebruiken in "Kutools voor Outlook". Deze methode stelt je in staat om alle bijlagen van een e-mail direct in een antwoord e-mail te kopiëren met slechts één klik - geen VBA of handmatig bijlagen kopiëren nodig.
Zeg vaarwel tegen inefficiëntie in Outlook! Kutools voor Outlook maakt het verwerken van e-mails in bulk gemakkelijker - nu met gratis AI-aangedreven functies! Download Kutools voor Outlook Nu!!
1. Selecteer in de Mail-weergave de e-mail waarop je wilt antwoorden. Klik vervolgens op "Kutools" > "Antwoorden met Originele Bijlage of Allen Beantwoorden met Originele Bijlage".
2. Nu worden alle bijlagen van de geselecteerde e-mail automatisch gekopieerd naar de antwoord e-mail.
Voordelen van de Kutools voor Outlook-methode:
- ✅ Geen handmatig kopiëren of plakken: Werkt direct met één klik.
- ✅ Geen VBA-codering nodig: Gebruiksvriendelijk en probleemloos.
- ✅ Tijd besparen: Drastisch minder inspanning in vergelijking met handmatige methoden.
- ✅ Compatibel met alle Outlook-versies: Geen macro-beperkingen of beveiligingswaarschuwingen.
Gerelateerde Artikelen
Hoe kopieer je een bijlage naar een andere e-mail in Outlook?
Beste Office-productiviteitstools
Breaking News: Kutools for Outlook lanceert een gratis versie!
Ervaar de geheel nieuwe Kutools for Outlook met meer dan100 fantastische functies! Klik om nu te downloaden!
📧 E-mailautomatisering: Automatisch antwoorden (Beschikbaar voor POP en IMAP) / Schema E-mail verzenden / Automatisch CC/BCC per Regel bij Verzenden / Automatisch doorsturen (Geavanceerde regels) / Begroeting automatisch toevoegen / Meerdere ontvangers automatisch opsplitsen naar individuele E-mail...
📨 E-mailbeheer: E-mail terughalen / Scam-e-mails blokkeren op onderwerp en anderen / Duplicaat verwijderen / Geavanceerd Zoeken / Organiseer mappen...
📁 Bijlagen Pro: Batch opslaan / Batch loskoppelen / Batch comprimeren / Automatisch opslaan / Automatisch loskoppelen / Automatisch comprimeren...
🌟 Interface-magie: 😊Meer mooie en gave emoji's / Herinneren wanneer belangrijke e-mails binnenkomen / Outlook minimaliseren in plaats van afsluiten...
👍 Wonders met één klik: Antwoord Allen met Bijlagen / Anti-phishing e-mails / 🕘Tijdzone van de afzender weergeven...
👩🏼🤝👩🏻 Contacten & Agenda: Batch toevoegen van contacten vanuit geselecteerde E-mails / Contactgroep opsplitsen naar individuele groepen / Verjaardagsherinnering verwijderen...
Gebruik Kutools in je voorkeurt taal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en meer dan40 andere talen!
🚀 Eén klik downloaden — Ontvang alle Office-invoegtoepassingen
Sterk aanbevolen: Kutools for Office (5-in-1)
Met één klik download je vijf installatiepakketten tegelijk — Kutools voor Excel, Outlook, Word, PowerPoint en Office Tab Pro. Klik om nu te downloaden!
- ✅ Eén-klik gemak: Download alle vijf de installaties in één actie.
- 🚀 Klaar voor elke Office-taak: Installeer de invoegtoepassingen die je nodig hebt, wanneer je ze nodig hebt.
- 🧰 Inclusief: Kutools voor Excel / Kutools for Outlook / Kutools voor Word / Office Tab Pro / Kutools voor PowerPoint