E-mailextractie in Outlook: Haal belangrijke informatie zoals namen, bedrijven, nummers en E-mailadres eruit

In de huidige snelle e-mailcommunicatie is het snel extraheren van belangrijke informatie uit e-mails—zoals namen, e-mailadressen, nummers (bijv. prijzen, telefoonnummers) en bedrijfsnamen—van cruciaal belang. Vooral bij lange e-mails helpt het extraheren van deze gegevens gebruikers niet alleen om de inhoud sneller te begrijpen, maar verhoogt het ook aanzienlijk de werkefficiëntie en -nauwkeurigheid. Deze handleiding beschrijft drie methoden voor het extraheren van e-mailinformatie: Handmatige extractie, VBA-semi-geautomatiseerde extractie en KUTOOLS AI volledig geautomatiseerde extractie, zodat u de beste aanpak voor uw behoeften kunt kiezen.

Traditionele extractie – Handmatig

Kopieer en plak gegevens handmatig uit e-mails – eenvoudig, maar traag en gevoelig voor fouten.

KUTOOLS AI voor extractie – Volledig geautomatiseerd

Extraheer gegevens automatisch met één klik dankzij de AI-assistent van Kutools voor Outlook – snel, nauwkeurig en kinderlijk eenvoudig.

VBA voor extractie – Semi-geautomatiseerd

Gebruik VBA-scripts om de extractie gedeeltelijk te automatiseren. Vereist programmeervaardigheden en biedt beperkte aanpassingsmogelijkheden.

---

Traditionele extractie – Handmatig

---

Handmatige extractie is de meest basale methode: gebruikers openen e-mails, zoeken handmatig naar belangrijke gegevens—zoals namen, e-mailadressen en telefoonnummers—en kopiëren die vervolgens naar Excel of andere documenten.

Stap 1. Open de doele-mail en lees de inhoud zorgvuldig door.

Stap 2. Zoek handmatig de belangrijke informatie op (bijv. namen, e-mailadres, telefoonnummer), selecteer deze en druk op Ctrl+C om te kopiëren.

Stap 3. Ga naar Excel of een ander document en druk op Ctrl+V om te plakken.

---

KUTOOLS AI voor extractie – Volledig geautomatiseerd

---

Kutools voor Outlook’s AI-assistent biedt een volledig geautomatiseerde oplossing. Dankzij geavanceerde AI-technologie extraheren gebruikers met één klik belangrijke informatie, zoals namen, bedrijfsnaam, telefoonnummer en e-mailadres.

Stap 1. Installeer Kutools voor Outlook en open daarna Outlook. Klik op Kutools > AI om de KUTOOLS AI-functie in te schakelen.

Stap 2. Ga naar het geactiveerde KUTOOLS AI-deelvenster, klik op het tabblad Extractie en klik vervolgens op de knop Genereren om de informatie uit de huidige e-mail via AI te extraheren.

U ziet dat alle belangrijke informatie is geëxtraheerd en wordt weergegeven in het deelvenster.

Stap 3 - 1. Als de inhoud niet gestructureerd is, klikt u op de knop Opnieuw genereren om de AI nieuwe belangrijke informatie te laten extraheren.

Stap 3 - 2. Als u tevreden bent met de inhoud, klikt u op de knop Kopiëren om de geëxtraheerde inhoud te kopiëren en overal te plakken waar u maar wilt.

Aanpassingsmogelijkheden

Gebruikers kunnen aanpassen welke soorten informatie moeten worden geëxtraheerd, zoals namen, bedrijfsnaam en telefoonnummer.

Klik op de knop Vaardigheidsbibliotheekbeheer, zoek de vaardigheid Extractie en klik op de knop Toevoegen om uw aangepaste verzoeken in te voeren en op te slaan.

---

VBA voor extractie – Semi-geautomatiseerd

---

VBA (Visual Basic for Applications) is een semi-geautomatiseerde methode waarmee gebruikers specifieke informatie uit e-mails kunnen halen door zelf scripts te schrijven.

Opmerking: Het hier verstrekte VBA-script kan alleen e-mailadressen en nummers extraheren, en toont de geëxtraheerde inhoud in een dialoogvenster zonder mogelijkheid tot kopiëren.

Stap 1. Open de doel-e-mail en lees de inhoud zorgvuldig door.

Stap 2. Druk op Alt+F11 om het venster Microsoft Visual Basic for Applications te openen en klik vervolgens op Invoegen > Module om een nieuwe module te maken.

Stap 3. Kopieer het onderstaande VBA-script en plak het in de nieuwe module.

VBA: E-mailadressen extraheren en nummers Toevoegen vanuit huidige e-mail

Sub ExtractDataFromCurrentEmail()
'UpdateByKutools
    Dim xCurEmail As Object
    Dim xEmailBody As String
    Dim xEmailPattern As String
    Dim xPhonePattern As String
    Dim xMatches As Object
    Dim xMatch As Variant
    Dim xExtractedData As String
    On Error Resume Next
    'Get the currently selected email
    If Application.ActiveWindow = Inspector Then
        Set xCurEmail = Application.ActiveInspector.CurrentItem
    Else
        Set xCurEmail = Application.ActiveExplorer.Selection.Item(1)
    End If
    'Check if the selected item is an email
    If xCurEmail.Class <> olMail Then
        MsgBox "Please select an email to extract data.", vbExclamation
        Exit Sub
    End If
    'Extract the email body
    xEmailBody = xCurEmail.Body
    'Define regex patterns for email addresses, and phone numbers
    xEmailPattern = "\b[A-Za-z0-9._%+-]+@[A-Za-z0-9.-]+\.[A-Z|a-z]{2,}\b"
    xPhonePattern = "\d+"
    'Initialize the extracted data string
    xExtractedData = "Extracted Data:" & vbCrLf & vbCrLf
    'Extract email addresses using regex
    Set xMatches = ExtractUsingRegex(xEmailBody, xEmailPattern)
    If xMatches.Count > 0 Then
        xExtractedData = xExtractedData & "Email Addresses:" & vbCrLf
        For Each xMatch In xMatches
            xExtractedData = xExtractedData & xMatch & vbCrLf
        Next xMatch
        xExtractedData = xExtractedData & vbCrLf
    Else
        xExtractedData = xExtractedData & "No email addresses found." & vbCrLf & vbCrLf
    End If
    'Extract phone numbers using regex
    Set xMatches = ExtractUsingRegex(xEmailBody, xPhonePattern)
    If xMatches.Count > 0 Then
        xExtractedData = xExtractedData & "Numbers:" & vbCrLf
        For Each xMatch In xMatches
            xExtractedData = xExtractedData & xMatch & vbCrLf
        Next xMatch
    Else
        xExtractedData = xExtractedData & "No numbers found." & vbCrLf
    End If
    'Display the extracted data in a message box
    MsgBox xExtractedData, vbInformation, "Extracted Data"
End Sub

Function ExtractUsingRegex(Text As String, Pattern As String) As Object
    Dim xRegex As Object
    Set xRegex = CreateObject("VBsrcipt.RegExp")
    With xRegex
        .Global = True
        .IgnoreCase = True
        .Pattern = Pattern
    End With
    Set ExtractUsingRegex = xRegex.Execute(Text)
End Function

Stap 4. Klik op de knop Uitvoeren of druk op de toets F5 en klik vervolgens op de knop Uitvoeren om de code uit te voeren.

Er verschijnt een dialoogvenster met de geëxtraheerde informatie.

---

Vergelijking van methoden

---

Methode	Handmatige extractie	Kutools	VBA
Gebruiksgemak	Eenvoudig	Zeer eenvoudig	Matig
Best geschikt voor	Incidenteel gebruik	Frequent of grootschalige taken	Geavanceerde gebruikers
Aanpassingsmogelijkheden	Geen	Zeer aanpasbaar	Beperkt (vereist programmeren)
Extractiesnelheid	Langzaam	Snel	Matig
Nauwkeurigheid	Laag	Hoog	Matig

Of u nu incidenteel informatie moet extraheren of regelmatig grote hoeveelheden e-mails verwerkt, de drie methoden in deze handleiding voldoen aan al uw behoeften. Op zoek naar een snelle, nauwkeurige en programmeervrije oplossing? Dan is de AI-assistent van Kutools voor Outlook uw beste keuze.Download het nu en profiteer van een gratis proefversie om het gemak van e-mailextractie met één klik te ervaren!

Gerelateerde artikelen

• Grammaticacontrole in Outlook: Zorg voor foutloze e-mails
• Reageer moeiteloos op e-mails in Outlook met AI-kracht
• Vereenvoudig het schrijven van e-mails: AI in Outlook gemakkelijk gemaakt
• AI-samenvatting voor Outlook-e-mails