如何提取表格中的两个数字

如何提取表格中的两个数字

答：使用自定义函数。

函数介绍：ExtrN(单元格,第几个数)
按ALT+F11组合键，打开VB窗口，执行"插入"-"模块"，复制下面代码进去，回到工作表，像使用普通公式一样使用ExtrN这个函数。
Function ExtrN(Rng As Range, Num As Integer)
    Dim regEX As Object
    Set regEX = CreateObject("vbscript.regexp")
    With regEX
        .Global = True
        .Pattern = "d+.?d?*d+.?d?"
        ExtrN = Split(.Execute(Rng.text)(0).Value, "*")(Num - 1)
    End With
End Function追问能不能给 个详细截图步骤，我试了一下，没成功追答1、打开Excel选项对话框，添加开发工具到右边。

2、点击Visual Basic。

3、插入一个模块。

4、复制代码进去

5、回到工作表，使用公式

追问你好，上面这些我看懂了，就是最后回到表格中后，怎样操作使用公式，拜托再说明下，拜托了追答照最后一个图，假设原始数据在A1单元格，你在
B1里写：
=ExtrN(A1,1)
B2里写：
=ExtrN(A1,2)追问

输入完=ExtrN(A1,1)，再按回车键就弹出上图来了，我哪里出错了

追答应该是你多插入了一个模块，只需要一个模块就行，删除多余模块。追问哈哈，我成功了，太感谢大神了，膜拜

《炉石传说》

如果数据都与截图类似，即单元格中的数字除了两个数字相乘外，没有别的数字，且以“--”结尾，这就是有规律了。有规律就好用公式。遗憾的是截图没有行号和列标，不知道这些个数据在工作表中的什么位置。现在假设数据在A列，以提取A1单元格中“满钻荔树九鱼图200*80--满钻”的200和80为例，公式如下 ：
B1=--MId(A1,MATCH(,0/MId(A1&5^19,ROW($1:$99),1),),FIND("*",A1)-MATCH(,0/MId(A1&5^19,ROW($1:$99),1),))
同时按Ctrl+Shift+Enter三键输入数组公式，下拉
C1=--MId(A1,FIND("*",A1)+1,FIND("--",A1)-FIND("*",A1)-1)
下拉

PS：提问截图也应该你上面的截图，带上行号和列标，还有公式编辑栏（如果有公式），这样别人一看就对工作表的结构一目了然。

数组公式如下（按ctrl+shift+enter产生花括号）：
=MId(LEFt(A1,FIND("--",A1)-1),MIN(IF(ISNUMBER(--MId(LEFt(A1,FIND("--",A1)-1),ROW($1:$99),1)),ROW($1:$99),99)),99)
如下图所示：