作者:乔山办公网日期:
返回目录:excel表格制作
举例说明。
例如有zhidao数据表如图:
现要求将A列的数值提取后放在B列。
第一步:内插入模块,写入自定义函数。代码如下:容
Function qczf(A)
With CreateObject("vbscript.RegExp")
.Global = True
.ignorecase = True
.Pattern = "[^0-9]"
qczf = .Replace(A, "")
End With
End Function
第二步:在B2输入公式:=qczf(A2)
第三步:将B2的公式下拉至B4.结果如图:
1、文字在前数字在后来:取数字公式=RIGHT(A1,LENB(A1)-LEN(A1)) 下拉填充
2、数字在前文字在后:取数字公式自=LEFT(A1,2*LEN(A1)-LENB(A1)) 下拉填充3、数字在中间、文字在两zhidao边:取数字公式=-LOOKUP(0,-MID(A1,ROW(INDIRECT("1:"&LEN(A1))),2*LEN(A1)-LENB(A1))) 下拉填充
在B1中输入或复制粘贴此公式
=LEFT(A1,MIN(FIND(ROW($1:$10)-1,A1&1234567890))-1)
按三键CTRL+SHIFT+ENTER结束公式输入
下拉填充
1、电脑打开Excel表格,百输入公式=RIGHT(C5,LEN(C5)*2-LENB(C5))。
2、按回车键确度定知公式,就可道以把数字提专取出来了属。
3、输入公式=LEFT(C6,LENB(C6)-LEN(C6))。
4、就可以把汉字提取出来了。