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 String im I As integer for 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 String dim 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) ThenStr=Replace(Str,chr,' ')End IfNext
arr 1=Split(Trim(Str))ReDim arr 2(UBound(arr 1))For I=0 To UBound(arr 1)If arr 1(I)' ' thenarr 2(j)=arr 1(I)j=j 1 end If next
GetNums=IIf(num=j,Arr2(num - 1),' ')line1:End函数
6.在后面的单元格中输入“=Getnums(A3,2)”以提取第一次出现的数组。