excel如何提取数字?
excel如何提取数字?Excel提取数字的方法:
1、汉字在前,数字在后。你可以使用mid,min和find函数来提取里面的数字。如图所示,在B2输入“=mid (a1,min (find ({0,1,2,3,4,5,6,7,8,9},a1" 0123456789 ")),20)”。
2.把所有的数字放在牢房里。可以使用宏。先打开VBA编辑器。工具——宏——visual basic编辑器。
3.单击在编辑器中插入——模块。在模块中输入以下代码:
将内容复制到剪贴板。
函数zzsz(xStr As String)As StringDim I As IntegerFor I=1 To Len(xStr)If is numeric(Mid(xStr,I,1))那么zzsz=zzsz Mid(xStr,I,1)NextEnd函数
4.回到工作表,在B2单元格中输入“=zzsz(A2)”。您可以使用VBA提取A2单元格中的所有数字。
5.指定从哪个数组开始。也就是说,在那些不连续的数字中,它们是从第一次出现的数组中提取出来的。另外,在模块中输入以下代码:
将内容复制到剪贴板。
函数GetNums(rCell As Range,num As Integer)As StringDim arr 1()As String,Arr2() As StringDim chr As String,Str As StringDim i As Integer,j As IntegerOn错误转到第1行
Str=rCell。text for I=1 To Len(Str)chr=Mid(Str,I,1)If (Asc(chr) 48或Asc(chr) 57)然后Str=Replace(Str,chr," ")End IfNext
Arr1=分割(微调(Str))ReDim Arr2(UBound(Arr1))对于i=0到UBound(Arr1)如果arr 1(I)" na nr2(j)=arr 1(I)j=j 1 end If next
GetNums=IIf(num=j,arr 2(num1)," ")line1:End函数
6.在后单元格输入“=Getnums(A3,2)”,提取第一次出现的数组,如图。
版权声明:excel如何提取数字?是由宝哥软件园云端程序自动收集整理而来。如果本文侵犯了你的权益,请联系本站底部QQ或者邮箱删除。