首先使用公式提取连续数字,再通过FIND与MID组合提取首个数字段,接着用VBA自定义函数遍历字符获取所有数字,最后利用Power Query批量处理数据并提取数字。
如果您在处理包含文字与数字混合的单元格时,希望仅提取其中的数字部分,可以使用多种方法实现。Excel本身不提供直接提取数字的内置函数,但可以通过公式组合或工具辅助完成。
本文运行环境:Dell XPS 13,Windows 11
一、使用公式提取连续数字
通过嵌套函数组合可以从文本开头或中间提取连续的数字字符。此方法适用于数字位于文本前段且连续的情况。
1、在目标单元格中输入以下数组公式:
=TEXTJOIN("",TRUE,IF(ISNUMBER(--MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1)),MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1),"")) 2、输入完成后按 Ctrl + Shift + Enter 确认,Excel会自动添加花括号表示数组公式。
3、将公式向下填充以应用到其他行。
二、提取首个连续数字段(适用于含多个数字的文本)
当单元格中包含多个数字片段时,可通过此方法提取第一个出现的数字序列。
1、使用FIND定位第一个数字出现的位置:
=MIN(IF(ISNUMBER(--MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1))*1,ROW(INDIRECT("1:"&LEN(A1)))))
2、结合MID函数提取从该位置开始的连续数字:
=IFERROR(MID(A1,MATCH(TRUE,ISNUMBER(--MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1)),0),SUMPRODUCT(--ISNUMBER(--MID(MID(A1,MATCH(TRUE,ISNUMBER(--MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1)),0),LEN(A1)),ROW(INDIRECT("1:"&LEN(A1))),1)))),"") 3、同样需以 Ctrl + Shift + Enter 输入数组公式。
三、使用VBA自定义函数提取所有数字
VBA能够遍历每个字符并判断是否为数字,适合复杂场景下的灵活处理。
Trae win Trae Windows 官方版本现已全面支持 Win10 和 Win11 系统(64位)。国内开发者可直接访问 Trae 中文官网(trae.cn 或 trae.com.cn),一键下载官方正版 .exe 安装包,享受国内直连的高速稳定体验。安装过程极其简便,双击即可运行,并支持一键无缝导入 VS Code 或 Cursor 的原有主题、快捷键及插件配置。登录支持手机号、微信或稀土掘金账号。内置免费的豆包与 DeepSeek 等顶级大模型,让你开箱即用,轻松开启高效的 AI 智能编程之旅。
下载1、按 Alt + F11 打开VBA编辑器,插入新模块。
2、粘贴以下代码:
Function ExtractNumbers(cellRef As Range) As StringDim i As IntegerDim result As StringFor i = 1 To Len(cellRef.Value)If IsNumeric(Mid(cellRef.Value, i, 1)) Thenresult = result & Mid(cellRef.Value, i, 1)End IfNext iExtractNumbers = resultEnd Function
3、关闭编辑器,在工作表中使用函数
=ExtractNumbers(A1)即可返回所有数字拼接结果。
四、利用Power Query拆分并提取数字
Power Query适合批量处理大量数据,通过字符拆分和筛选实现数字提取。
1、选择数据区域,点击「数据」选项卡中的「从表格/区域」加载至Power Query。
2、在Power Query编辑器中选中目标列,点击「转换」→「格式」→「提取」→「仅数字」。
3、若无此选项,可手动添加自定义列,使用表达式:
Text.Select([Column1],{"0".."9"})
