Question

excel表格怎么把一列中的数字提取出来

Answer 1

启动Excel 2010，本例以 Excel 2010为例进行讲解，其他版本的操作方法类似，只需要找到对应的菜单及功能键即可

如下图的一组数据，我们在需要处理的数据旁设置一列辅助列

先来处理数据在单元格左边的，在辅助列中输入如下图所示的函数“=LEFT(A2,2*LEN(A2)-LENB(A2))”，并应用到所有左边有数据的单元格

如下图，通过拖拽的方式进行拖拽应用，下图是实现后的效果图

同样再进行数据在单元格右边情况的数据提取，在辅助列输入下图所示的函数“=RIGHT(A11,2*LEN(A11)-LENB(A11))”

同样通过拖拽的方式进行拖拽应用，下图是实现后的效果图

Answer 2

{=RIGHT(LEFT(A2,MATCH(1,-MID(0&A2,COLUMN(2:2),1))-1),COUNT(-MID(A2&"a1",COLUMN(2:2),2)))}
{=-LOOKUP(,-MID(A2,MATCH(,MID(A2,ROW($1:$99),1)*0,),ROW($1:$15)))}
{=LOOKUP(9E+307,--MID(A2,MIN(FIND({1,2,3,4,5,6,7,8,9,0},A2&1234567890)),ROW($1:$1024)))}
上面3个数组公式都可以

Answer 3

假设数据在 a1看看
=MID(A1,MIN(IF(LENB(MID(A1,ROW($1:$99),1))=1,ROW($1:$99))),COUNT(--MID(A1,ROW($1:$99),1))+2)
能否满足你的需要，记得 按 CTRL+SHIFT+ENTER 结束输入。

Answer 4

Sub tst()
Dim i%
Dim cel As Range
Set cel = Cells(1, 1)
Dim p
For i = 1 To Len(cel)
 If VBA.IsNumeric(Mid(cel, i, 1)) Then p = p & Mid(cel, i, 1)
Next
MsgBox p
End Sub

VBA

Answer 5

你发截图看看到底是数字在表格中是怎样的才可以有针对性帮助你。