'自定义公式-按ALT+F11-插入模块-粘贴代码-将表格另存为启用宏的格式
Function 提取号码(a As String)
b = Split(a, ",")
For I = 0 To UBound(b)
If Left(b(I), 1) = 1 Then 提取号码 = 提取号码 & "," & b(I)
Next
If 提取号码 = 0 Then
提取号码 = ""
Else
提取号码 = Mid(提取号码, 2)
End If
End Function
B1=IF(A1="","",IFERROR(REPLACE(A1,MAX(FIND("(",A1)-1,1),14,),A1))
若是有2个及以上的手机号码,最好是用分列来做
数组公式!!是输入数组公式为:
=VLOOKUP(0,MID(C4,ROW($1:$99),11)*{0,1},2,0)
粘贴或者输入公式时,必须同时按CTRL+SHIFT+ENTER这3个键结束,否则公式是无效的!
第一步:以逗号为分隔符进行分列
第二步:筛选第1位不为1的,删除
第三步:根据格式需要做进一步调整。