作者：绿色风
分类：
时间：2022-08-17
浏览：133
楼主
gouweicao78 |
Q： 如何提取编码右侧尾部字符？
编码中间有不定个数的0，然后是字母和其他字符组成的尾部
例如：TDC00AP10*C*，提取AP10*C*
A：公式如下：
- =LOOKUP("座",REPLACE(A2,1,FIND(0&CHAR(ROW($65:$90)),A2),))
【解析】
1、使用CHAR(ROW($65:$90))分别返回A~Z字母，然后用FIND（如果有小写可以用SEARCH函数）查找0A、0B等出现的位置，并将此前的文字用REPLACE替换掉。
因为没有存在0A时，FIND会查找错误，所以返回的是1个正确和25个错误值。
2、利用LOOKUP函数查找忽略错误值的方法，查找最后一个文本。
 如何取中间不定个数0的编码尾部字符？.rar
|
2楼
larkzh |
为什么是"座"呢？是最后一个汉字吗？ |
3楼
Zaezhong |
不确定的0，那么应该存在没有零的情况吧，没有零公式就有问题了- Sub test()
- Dim rng As Range, cell As Range
- Set rng = Range("A2:A" & Cells(Rows.Count, 1).End(3).Row)
- With CreateObject("vbscript.regexp")
- .ignorecase = True
- .Global = True
- .Pattern = "(^[a-z]{1,}0+)?"
- For Each cell In rng
- If .test(cell) Then
- For Each Match In .Execute(cell)
- cell.Offset(, 2) = .Replace(cell, "")
- Next
- End If
- Next
- End With
- End Sub
|
免责声明
有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，
经与ExcelTip.Net站长Apolloh商议并征得其同意，
现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，
供有需要的人士查询使用，也慰缅曾经的论坛时代。
所示各个帖子的原作者如对版权有异议，
可与本人沟通提出，或于本站点留言，我们会尽快处理。
在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一