, her jeg introducere dig for lang formel til at udvinde kun den e - mail - adresser fra teksten i excel.gør som følger:,,,.,.i de tilstødende celle b1, træder denne formel = beklædning ((erstatning (venstre (a1, finde (", a1 &." "find (" @ ", a1)) - 1)," ", rapport (", len (a1)), len (a1))).,,,,,, 2.så tryk ind, nøgle, så vælg den celle, b1, og trække fylde klare til det interval, som du har lyst til at indeholde formlen.og e - mail - adresser i området er blevet ekstraheret fra tekststrengen.se skærmbillede:,,,,,, noter:,,, 1.den tegnsætning efter den e - mail - adresse, også vil blive udtaget., 2.hvis celler er ikke indeholder den e - mail - adresser, formel vil vise fejl værdier., 3.hvis der er mere end en e - mail - adresse i en celle, formel vil kun ekstrakt første adresse.,,,,, ekstrakt, e - mail - adresse fra tekststrengen med brugerdefinerede funktion, bortset fra ovennævnte formel, bruger defineret funktion kan også hjælpe dig med at få den e - mail - adresse fra tekststrengen.,,.,.hold den, alat + f11, nøgler, og det åbner, microsoft visual basic for ansøgninger, vindue.,,,. 2.klik, indsæt >, modul, og pasta følgende makroøkonomiske i modul vindue.,, funktion extractemailfun (extractstr som snor) som string "ajourføring 20130829 dim charlist som snor på fejl igen næste checkstr =" [a-za-z0-9. _ -] "outstr =" indeks = 1, når sandt index1 = vba. instr (indeks, extractstr "(") getstr = "." hvis index1 > 0 for p = index1 - 1 1. trin - 1, hvis mid (extractstr, s. 1), som checkstr så getstr = mid (extractstr, p. 1 & getstr anden udvej for hvis næste getstr = getstr & "(" p = index1 + 1 - len (extractstr) hvis mid (extractstr, s. 1), som checkstr sågetstr = getstr & mid (extractstr, p. 1 andre udgange til ende, hvis næste indeks = index1 + 1, hvis outstr = "" så outstr = getstr andre outstr = outstr & chr (10) & getstr, hvis anden udgang vil ende, hvis loop extractemailfun = outstr ende funktion, 3.så gem den kode, og ind i formlen, = extractemailfun (a1), i et tilstødende tom celle, se skærmbillede:,,,,,,. 4.og så presse ind, nøgle, vælge den celle b1, og slæber den fylde klare over for udvalget, at du har brug for en formel.og alle e - mail - adresser er hentet fra celle tekst.se skærmbillede:,,,,,, noter:,,, 1.hvis celler har ikke email adresser, afslører den tomme felter., 2.hvis der er mere end en e - mail - adresse i en celle, alle e - mails, vil blive fjernet.,,,,, ekstrakt, e - mail - adresse fra tekststrengen med vba kode,,, hvis du er over formler er generende for dem, følgende vba kode kan hjælpe dig ud på en mail - adresser.,,.,.hold den, alat + f11, nøgler, og det åbner en microsoft visual basic for ansøgninger, vindue.,,,. 2.klik, indsæt >, modul, og pasta følgende makroøkonomiske i modul vindue,.,,, e - mail - adresser vba: uddrag fra tekststrengen,,, - extractemail() "ajourføring 20130829 dim workrng som range dim arr som variant dim charlist som snor på fejl igen næste xtitleid =" kutoolsforexcel "workrng = anvendelse. udvælgelse, der er fastsat workrng = anvendelse. inputbox (" område ", xtitleid, workrng. adresse, type: = 8) arr = workrng. værdi checkstr =" [a-za-z0-9. _ -] "for i = 1 til ubound (arr, 1) til j = 1 til ubound (arr, 2) extractstr = arr (, j) outstr =" indeks = 1, når sandt index1 = vba. instr (indeks, extractstr "(") getstr = "." hvis index1 > 0 - fo -r p = index1 - 1 1. trin - 1, hvis mid (extractstr, s. 1), som checkstr så getstr = mid (extractstr, p. 1 & getstr anden udgang til ende, hvis næste getstr = getstr & "(" p = index1 + 1 - len (extractstr), hvis mid (extractstr, s. 1), som checkstr så getstr = getstr & mid (extractstr, p. 1 andre udgange til ende, hvis næste indeks = index1 + 1, hvis outstr = "" så outstr = getstr andetoutstr = outstr & chr (10) & getstr, hvis anden udgang vil ende, hvis loop arr (, j) = outstr næste workrng. værdi = arr ende afrika, 3.så tryk, f5, nøglen til at køre denne kode, og du skal vælge en rækkevidde, som de ønsker at bruge vba i op i samtalen, se skærmbillede:,,,,,,,,. 4.så klik, - og e - mail - adresser er hentet fra de udvalgte tekst tråde.se screenshots:,,,,,,,,,: 1.hvis celler har ikke den e - mail - adresser, afslører den tomme felter., 2.alle e - mails skal udtages, hvis der er mere end en e - mail - adresser i en celle,.,,. 3.den udtrukne e - mails, vil omfatte de originale data, så du må hellere forstærkning data først, hvis du har brug for.,,,,, ekstrakt, e - mail - adresse fra tekststrengen med kutools i excel - med et klik, ovennævnte metoder ser lidt kompliceret for vores excel - begynder her, kan jeg anbefale dem en hurtig og let redskab -, kutools for excel, med dens, ekstrakt, e - mail - adresse, nytteværdi, du kan få den e - mail - adresse fra teksten strengene uden megen.,, kutools for excel,:, med mere end 120 handy excel - tilføje ins, gratis prøve uden begrænsning i 60 dage.få det nu.gå til at downloade gratis 60 dayspurchase, brug /mycommerce, hvis de er monteret, kutools for excel, gør som følger: (gratis downloade kutools i excel -), 1.udtage celler indeholder teksten i.,,,. 2.klik, kutools, >, tekst, >, ekstrakt, e - mail - adresse, se skærmbillede:,,,,,, 3.og en, ekstrakt, e - mail - adresse, dialog boks vil dukke op, udvælge en celle, hvis du vil have det resultat, se skærmbillede:,,,,,,. 4.så klik, ok, alle e - mail - adresser er blevet ekstraheret fra teksten, tråde, se skærmbillede:,,,,,, gratis downloade kutools i excel - nu,,,,