代码之家 › 专栏 › 技术社区 › John Beasley

从专栏中提取电子邮件

trim formula excel-formula excel

John Beasley · 技术社区 · 4 年前

尝试使用以下公式从excel工作表中的列中提取电子邮件:

=TRIM(MID(SUBSTITUTE(" "&$A1&" "," ",REPT(" ",40)),
 FIND(REPT("@",COLUMNS($A1:A1)),SUBSTITUTE
 (SUBSTITUTE(" "&$A1&" "," ",REPT(" ",40)),"@",REPT("@",COLUMNS($A1:A1)),COLUMNS($A1:A1)))-40,80))

这个公式在很大程度上是有效的,但是一些记录中仍然包含其他文本。

例如,其中一条记录如下所示:

**TEST** John Beasley,jbeasley@usa.com,7575551212

使用上述公式后,我得到以下结果:

Beasley,jbeasley@usa.com,7575551212

下面是另一个例子:

USA-USA/J Beasley/jbeasley@usa.com/757-555-1212

使用公式后的结果:

Beasley/jbeasley@usa.com/757-555-1212

以下是公式何时起作用的示例(之前):

**US AMA TES DATA** John Beasley, jbeasley@usa.com

结果如下:

jbeasley@usa.com

所以这个公式是有效的,但它也不起作用。

我如何编写公式,以便它提取除实际电子邮件地址之外的所有内容?

1 回复 | 直到 4 年前

Scott Craner 4 年前

如果有,请使用FILTERXML:

=FILTERXML("<t><s>"&SUBSTITUTE(SUBSTITUTE(A1,"/",","),",","</s><s>")&"</s></t>","//s[contains(.,'@')]")

FILTERXML是在Excel 2013中引入的,仅在PC机上,而不是Mac上。

如果没有FILTERXML,我们可以使用:

=TRIM(MID(SUBSTITUTE(SUBSTITUTE(A1,"/",","),",",REPT(" ",999)),FIND("@",SUBSTITUTE(SUBSTITUTE(A1,"/",","),",",REPT(" ",999)))-500,999))

推荐文章

user8653311 · typescript:在特定字符数后修剪文本的其余部分

8 年前

embWalker · 在子字符串后批量修剪文本文件中的行-使用扩展进行REM修剪

8 年前

Kima321 · 在java[duplicate]中如何在之后拆分特定字符串

8 年前

Beginner · 如何测试是否使用了修剪和更换方法

8 年前

karateschnitzel · VBA:如果范围内的值为

8 年前

Jumper · 在svg上更改/显示修剪路径?

8 年前

LaurensVijnck · Excel VBA.Trim函数更改为,

8 年前

TylerH Ash Burlaczenko · 如何匹配字符串末尾的子字符串,然后仅删除该子字符串?

8 年前

KL_ · 修剪DataGridView单元格中的空格

8 年前

Mike · Oracle SQL:替换所有非数值,例如NULL、空白或空字符串

8 年前