如何把客户信息分列出来

zeng001 · 发表于 2022-9-14 19:49

1、把A列的地址电话分列出B列的地址和C列的电话

2、把D列的开户行名称分列出E列的开户行和F的银行账号
求各位大神帮助，谢谢！

客户信息.zip (8.13 KB, 下载次数: 28)

lpf127 · 发表于 2022-9-15 08:32

用的是21版office
开户行：
=TEXTJOIN(,,IFERROR(CHAR(CODE(MID($D2,ROW($1:$200),1))*(CODE(MID($D2,ROW($1:$200),1))>57)),""))

银行账号：
=TRIM(SUBSTITUTE(D2,E2,""))
你这两列的格式要先改为常规，这个方法只适合用于汉字直接没有数字的，这种还是建议用正则表达式提取

lpf127 · 发表于 2022-9-15 08:49

电话号码的提取是用VBA自定的函数，涉及到正则式，其他部分用Excel函数计算所得

第六维空间 · 发表于 2022-9-15 08:49

把那4列的单元格格式改一下

zeng001 · 发表于 2022-9-15 09:40

本帖最后由 zeng001 于 2022-9-15 09:41 编辑

客户信息.zip (14.11 KB, 下载次数: 3)

2022-9-15 09:41 上传
点击文件名下载附件

第六维空间发表于 2022-9-15 08:49
把那4列的单元格格式改一下

大神你好！我把地址电话的其他信息复制过去，发现有些地址和电话不能分列出来，请问可以帮忙修改一下函数吗？谢谢！

第六维空间 · 发表于 2022-9-15 09:47

zeng001 发表于 2022-9-15 09:40
大神你好！我把地址电话的其他信息复制过去，发现有些地址和电话不能分列出来，请问可以帮忙修改一下函数 ...

我是地址跟电话之间用空格分开了（用其它间隔符分开也可以），分开公式好写一些

我也没学多久，很多还不懂

秃头发师 · 发表于 2022-9-15 10:04

第六维空间发表于 2022-9-15 09:47
我是地址跟电话之间用空格分开了（用其它间隔符分开也可以），分开公式好写一些

我也没学多久，很多还 ...

如果地址跟电话之间用空格分开，数据规范，一切都会变得很简单。三个方法可选：
1. 分列
2.CTRL+E
3.公式
B2=LEFT(A2,FIND(" ",A2)-1)
B3=RIGHT(A2,LEN(A2)-FIND(" ",A2))

zeng001 · 发表于 2022-9-15 10:26

第六维空间发表于 2022-9-15 09:47
我是地址跟电话之间用空格分开了（用其它间隔符分开也可以），分开公式好写一些

我也没学多久，很多还 ...

我已经按你的方法把所有地址和电话分开了，谢谢你的帮助！

ericxzhou · 发表于 2022-9-15 10:28

Sub test()
Dim i%, arr
arr = [a1].CurrentRegion
With CreateObject("vbscript.regexp")
.Pattern = "[0-9\-]+$"
For i = 2 To UBound(arr)
arr(i, 3) = .Execute(arr(i, 1))(0).Value
arr(i, 2) = Left(arr(i, 1), Len(arr(i, 1)) - Len(arr(i, 3)))
arr(i, 6) = .Execute(arr(i, 4))(0).Value
arr(i, 5) = Left(arr(i, 4), Len(arr(i, 4)) - Len(arr(i, 6)))
Next
End With
[a1].CurrentRegion = arr
End Sub

复制代码

第六维空间 · 发表于 2022-9-15 10:31

zeng001 发表于 2022-9-15 10:26
我已经按你的方法把所有地址和电话分开了，谢谢你的帮助！

主要是因为地址中还有数字，后面开户行和账号可以不用的，有没有空格都一样

能够对你有所帮助就行

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

[已解决] 如何把客户信息分列出来