Contactgegevens (Telefoonnummer, E-mailadres) extraheren uit tekstreeksen in Excel

Wanneer u contactgegevens in Excel verwerkt, staan telefoonnummers en e-mailadressen vaak door elkaar in één cel – samen met namen, adressen en andere details. Dit komt regelmatig voor wanneer gegevens worden gekopieerd uit e-mails, websites of geïmporteerd uit externe bronnen.

Als u telefoonnummers en e-mailadressen in Excel moet extraheren, is handmatig werken vaak tijdrovend en foutgevoelig – zeker bij grote datasets of inconsistente indelingen. In deze stapsgewijze handleiding leert u hoe u snel telefoonnummers en e-mailadressen uit één cel in Excel kunt halen. Met deze technieken zuivert, ordent en structureert u uw gegevens efficiënter.

Contactgegevens (Telefoonnummer, E-mailadres) extraheren in Excel

• Methode 1: Met formules (Excel 365)
• Methode 2: Met een door de gebruiker gedefinieerde functie (alle Excel-versies)
• Methode 3: Met KUTOOLS AI’s Cells Aide

Uitgebreide toepassingen

• Meerdere contactpersonen extraheren naar afzonderlijke cellen
• Gestandaardiseerde Telefoonnummer-opmaak

Conclusie

Contactgegevens (Telefoonnummer, E-mailadres) extraheren in Excel

In deze sectie tonen we u drie praktische manieren om dit voor elkaar te krijgen: met formules in Excel 365, met een door de gebruiker gedefinieerde functie die werkt in alle Excel-versies, en met Kutools AI voor een snellere en flexibelere oplossing.

Contactgegevens extraheren (Telefoonnummer, E-mailadres) met formules (Excel 365)

Excel 365 ondersteunt dynamische matrixfuncties, waardoor het veel eenvoudiger wordt om patronen uit tekst te halen. Als uw Excel-versie functies zoals TEXTJOIN en REGEXEXTRACT ondersteunt, kunt u met formules direct telefoonnummers en e-mailadressen extraheren.

Extraheren van Telefoonnummer

De volgende formule haalt het telefoonnummer automatisch naar een aparte kolom en zorgt ervoor dat de resultaten direct worden bijgewerkt zodra de brongegevens wijzigen.

1. Selecteer een lege cel waarin het geëxtraheerde telefoonnummer moet verschijnen, en kopieer en plak de volgende formule:

   =TEXTJOIN(", ",TRUE,REGEXEXTRACT(A2,"\(?\d{3}\)?[-\s]?\d{3}[-\s]?\d{4}",1))

2. Druk op Enter. Sleep de vulgreep omlaag om de formule, indien nodig, op andere cellen toe te passen. Als er meerdere telefoonnummers worden gevonden, worden deze in één cel weergegeven, gescheiden door komma’s. Zie screenshot:
   

E-mailadressen extraheren

Als u Excel 365 gebruikt, bieden formules een snelle en dynamische manier om e-mailadressen te herkennen en automatisch uit te filteren.

1. Klik op een lege cel waarin de geëxtraheerde e-mailadressen moeten verschijnen en voer vervolgens de formule in:

   =TEXTJOIN(", ",TRUE,REGEXEXTRACT(A2,"[A-Za-z0-9._%+-]+@[A-Za-z0-9.-]+\.[A-Za-z]{2,}",1))

2. Druk op Enter. Sleep de vulgreep omlaag om de formule, indien nodig, op andere cellen toe te passen. Als er meerdere e-mailadressen worden gevonden, worden deze in één cel weergegeven, gescheiden door komma’s. Zie screenshot:
   

Contactgegevens extraheren (Telefoonnummer, E-mailadres) met een door de gebruiker gedefinieerde functie

Als de bovenstaande formules niet beschikbaar zijn in uw Excel-versie, biedt een door de gebruiker gedefinieerde functie (UDF) een krachtig alternatief om contactgegevens te extraheren.

1. Druk op Alt + F11 om de VBA-editor te openen.
2. Klik vervolgens op Invoegen>Moduleen plak de volgende code:

   Function ExtractContactInfo(txt As String, infoType As String) As String
       Dim reg As Object
       Dim matches As Object
       Dim m As Object
       Dim result As String
       Dim pattern As String
       Set reg = CreateObject("VBScript.RegExp")
       reg.Global = True
       reg.IgnoreCase = True
       Select Case LCase(infoType)
           Case "phone"
               pattern = "\(?\d{3}\)?[-.\s]?\d{3}[-.\s]?\d{4}"
           Case "email"
               pattern = "[A-Za-z0-9._%+-]+@[A-Za-z0-9.-]+\.[A-Za-z]{2,}"
           Case Else
               ExtractContactInfo = "Invalid type"
               Exit Function
       End Select
       reg.pattern = pattern
       If reg.Test(txt) Then
           Set matches = reg.Execute(txt)
           For Each m In matches
               result = result & m.Value & ", "
           Next m
           result = Left(result, Len(result) - 2)
       End If
       ExtractContactInfo = result
   End Function

3. Sluit de editor en keer terug naar uw werkblad. Voer in een lege cel de volgende formule in:
   • Extraheren Telefoonnummer:=ExtractContactInfo(A2,"phone")
   • E-mailadressen extraheren:=ExtractContactInfo(A2,"email")
4. Sleep de formules vervolgens omlaag om alle telefoonnummers en e-mailadressen tegelijkertijd uit de lijst te extraheren.
   

Contactgegevens extraheren (Telefoonnummer, E-mailadres) met KUTOOLS AI

Als u liever een methode gebruikt die geen formules of VBA-code vereist, biedt KUTOOLS AI’s Cells Aide een veel eenvoudigere manier om telefoonnummers en e-mailadressen uit cellen te extraheren.

Met KUTOOLS AI kunt u niet alleen Telefoonnummer en E-mailadres extraheren, maar ook namen en andere soorten informatie. Voer eenvoudigweg een instructie in waarin u beschrijft wat u wilt extraheren, en het kan vrijwel elke gewenste inhoud uit de geselecteerde cellen ophalen.

1. Klik op Kutools>KUTOOLS AI>Cells Aide, zie screenshot:
   
2. Geef in het dialoogvenster Cells AI All-in-One Aidede volgende opties op:
   1. Selecteer in het Bronbereik-bereikvak de cellen met de tekstreeksen die u wilt verwerken;
   2. Klik op de Promptbibliotheek-keuzelijst en selecteer Contactgegevens extraheren als vooraf gedefinieerde prompt.
   3. Bekijk of pas de prompt in het Promptinhoud-vak aan uw behoeften aan. Bijvoorbeeld:
      Haal de naam, telefoonnummer(s) en e-mailadres(sen) uit de celtekst. Als er meerdere telefoonnummers of e-mailadressen worden gevonden, geef deze dan in één cel weer, gescheiden door komma’s. Geef een lege waarde terug als er geen overeenkomst is gevonden.
   4. Klik op de Genereer-knop. KUTOOLS AI analyseert de geselecteerde gegevens en toont de geëxtraheerde gegevens in het Resultaat-paneel aan de rechterkant.
      
3. Nadat u het resultaat heeft verkregen, klikt u op Invoegen in bereik en selecteert u een lege cel om de geëxtraheerde informatie te plaatsen. Klik ten slotte op OK.
   

Resultaat: Alle opgegeven contactgegevens—zoals namen, telefoonnummers en e-mailadressen—worden geëxtraheerd naar afzonderlijke cellen voor een overzichtelijke weergave en eenvoudig gebruik.

Uitgebreide toepassingen

Nadat u telefoonnummers en e-mailadressen uit tekstreeksen hebt geëxtraheerd, moet u de resultaten vaak nog verder organiseren voor praktisch gebruik. In veel gevallen volstaat het simpelweg extraheren van contactgegevens uit één cel niet. U wilt meerdere contactpersonen mogelijk in afzonderlijke cellen plaatsen voor eenvoudigere analyse of de geëxtraheerde resultaten standaardiseren naar een consistente indeling voor een netter en professioneler werkblad.

Meerdere contactpersonen extraheren naar afzonderlijke cellen

Soms bevat één cel meerdere telefoonnummers of e-mailadressen. In dergelijke gevallen is het combineren van alle resultaten in één cel vaak niet de meest praktische oplossing, zeker als u de gegevens later wilt sorteren, filteren, importeren of analyseren.

De volgende formules kunnen u helpen:

Extraheren van Telefoonnummer naar afzonderlijke cellen:

=REGEXEXTRACT(A2,"\(?\d{3}\)?[-\s]?\d{3}[-\s]?\d{4}",1)

E-mailadressen extraheren naar afzonderlijke cellen:

=REGEXEXTRACT(A2,"[A-Za-z0-9._%+-]+@[A-Za-z0-9.-]+\.[A-Za-z]{2,}",1)

Standaardiseren van de opmaak van Telefoonnummer

De bovenstaande formules extraheren het telefoonnummer in de oorspronkelijke opmaak. Voor nettere en consistenter resultaten kunt u deze verder opmaken in een standaardstijl, zoals (555) 123-4567, met behulp van de onderstaande formules.

=LET(
nums,REGEXEXTRACT(A2,"\(?\d{3}\)?[-\s]?\d{3}[-\s]?\d{4}",1),
TEXTJOIN(", ",TRUE,
MAP(nums,LAMBDA(x,
LET(
d,TEXTJOIN("",TRUE,IFERROR(MID(x,SEQUENCE(LEN(x)),1)*1,"")),
"("&LEFT(d,3)&") "&MID(d,4,3)&"-"&RIGHT(d,4)
)
))
)
)

Conclusie

Kort samengevat: het extraheren van telefoonnummers en e-mailadressen uit tekstreeksen in Excel verbetert de duidelijkheid en bruikbaarheid van uw gegevens aanzienlijk. Of u nu kiest voor formules in Excel 365, een door de gebruiker gedefinieerde functie voor bredere compatibiliteit of KUTOOLS AI’s Cells Aide voor een snellere en flexibelere ervaring – elke methode zet ongestructureerde contacttekst effectief om in georganiseerde informatie.

Elke methode heeft zijn eigen voor- en nadelen. De vergelijkingstabel hieronder helpt u snel de methode te kiezen die het beste aansluit bij uw Excel-versie, vaardigheidsniveau en behoeften voor gegevensextractie.