提取手机和座机号

伊可赛二 · 发表于 2024-2-2 19:14

本帖最后由伊可赛二于 2024-2-2 19:16 编辑

假设座机都是8位。VBA用正则可能更好，两列分别用正则跑了一下，不知是否是想要的结果。

世界客都 · 发表于 2024-2-2 20:49

还是用正则表达式提取吧，方便一些

Holiday2022 · 发表于 2024-2-2 21:25

伊可赛二发表于 2024-2-2 19:14
假设座机都是8位。VBA用正则可能更好，两列分别用正则跑了一下，不知是否是想要的结果。

您好，regexmatch()这个函数是你自己在vba中写的吗？还是怎么获取的？

伊可赛二 · 发表于 2024-2-3 07:47

Holiday2022 发表于 2024-2-2 21:25
您好，regexmatch()这个函数是你自己在vba中写的吗？还是怎么获取的？

不会VBA，很久以前在网上找的。

Holiday2022 · 发表于 2024-2-3 08:35

伊可赛二发表于 2024-2-3 07:47
不会VBA，很久以前在网上找的。

导入该函数的文件，已经找不到了是吗？

我要成为专家 · 发表于 2024-2-3 09:13

本帖最后由我要成为专家于 2024-2-3 09:15 编辑

d2

=TEXTJOIN("/",1,IF(LEN(IFERROR(--TEXTSPLIT(A2,{" ","/","，","、","（"}),""))=11,IFERROR(--TEXTSPLIT(A2,{" ","/","，","、","（"}),""),""))

复制代码

下拉
e2

=TEXTJOIN("/",1,IF(LEN(IFERROR(--TEXTSPLIT(A2,{" ","/","，","、","（","-"}),""))=8,IFERROR(--TEXTSPLIT(A2,{" ","/","，","、","（",",","-"}),""),""))

复制代码

下拉
不支持texsplit的excel版本不适用

Holiday2022 · 发表于 2024-2-3 09:19

伊可赛二发表于 2024-2-3 07:47
不会VBA，很久以前在网上找的。

感觉您这个函数还挺厉害的

qydn · 发表于 2024-2-3 09:25

Holiday2022 发表于 2024-2-3 09:19
感觉您这个函数还挺厉害的

这个函数是自定义函数吧

Holiday2022 · 发表于 2024-2-3 09:54

qydn 发表于 2024-2-3 09:25
这个函数是自定义函数吧

看着像是，不知道怎么导入的。我在网上找了好久也没找到

qydn · 发表于 2024-2-3 10:44

Holiday2022 发表于 2024-2-3 09:54
看着像是，不知道怎么导入的。我在网上找了好久也没找到

如果你有该自定义函数的文件，按照上图另存后，就可以用了哈

		自动登录	找回密码
密码			免费注册

[已解决] 提取手机和座机号