Excel如何只提取表格中的数字?下面一起来看看 。
【Excel如何只提取表格中的数字】1、汉字在前,数字在后面的情形 。可以用MID,min,find三个函数来实现提取里面的数字 。如图:在B2输入=MID(A1,MIN(FIND({0,1,2,3 , 4,5 , 6,7,8,9} , A10123456789)),20)
2 、把单元格里面所有的数字都提出来 。可以使用宏 。先打开VBA编辑器 。工具宏visual basic 编辑器
3、在编辑器里点击插入模块 。在模块那里输入如下代码:
复制内容到剪贴板
Function zzsz(xStr As String) As StringDim i As IntegerFor i = 1 To Len(xStr)If IsNumeric(Mid(xStr , i,1)) Then zzsz = zzszMid(xStr, i,1)NextEnd Function
4、回到工作表,在B2单元格那里输入=zzsz(A2) 。就可以用VBA把A2单元格里所有的数字都提取出来了,如图所示 。
5、指定从第几个数组提取开始 。也就是说在不连续的那些数字中,从第几次出现的数组开始提取 。同样在模块那里输入如下代码:
复制内容到剪贴板
Function GetNums(rCell As Range, num As Integer) As StringDim Arr1() As String, Arr2() As StringDim chr As String,Str As StringDim i As Integer,j As IntegerOn Error GoTo line1
Str = rCell.TextFor i = 1 To Len(Str)chr = Mid(Str,i,1)If (Asc(chr)48 Or Asc(chr)57) ThenStr = Replace(Str,chr,)End IfNext
Arr1 = Split(Trim(Str))ReDim Arr2(UBound(Arr1))For i = 0 To UBound(Arr1)If Arr1(i) ThenArr2(j) = Arr1(i)j = j + 1End IfNext
GetNums = IIf(num = j,Arr2(num - 1),)line1:End Function
6、在回到单元格那里输入=Getnums(A3,2)就可以提取第几次出现的数组了,如图所示 。
Excel如何只提取表格中的数字的详细内容就为您分享到这里,【精彩生活】jing111.com小编为您精选以下内容,希望对您有所帮助:
- excel如何设置只有填写到指定单元格才能保存?
- 上铺无支架如何挂窗帘
- 天猫如何用微信支付
- 一只白蚁会繁殖吗
- 如何增强皮肤角质层
- microsoft office excel已停止工作怎么办 microsoft office excel停止工作解决方法
- 如何自我诊断三叉神经痛
- 在Excel表格中如何删除复杂数据中的数字部分
- Excel 2016表格中下拉列表怎么输入数据
- 波士顿矩阵图如何制作