excel中如何将文字中的数字提取出来,并且使用空格分隔

首先,按下 Alt + F11 打开 Visual Basic for Applications (VBA) 编辑器,然后在左侧的项目资源管理器中,双击你的工作簿,然后选择插入 -> 模块,然后在新的代码窗口中粘贴以下代码:

Function ExtractNumbers(text As String) As String
    Dim regex As Object
    Dim matches As Object
    Dim i As Integer
    
    Set regex = CreateObject("VBScript.RegExp")
    regex.Global = True
    regex.IgnoreCase = True
    regex.Pattern = "\d+"
    
    Set matches = regex.Execute(text)
    
    For i = 0 To matches.Count - 1
        ExtractNumbers = ExtractNumbers & matches(i) & " "
    Next i
End Function

然后,在 Excel 中,你可以使用这个自定义函数来提取数字,并将它们用空格分隔开。例如,如果你的文字位于单元格 A1 中,你可以在另一个单元格中输入以下公式:

 

=ExtractNumbers(A1)

然后按 Enter 键,即可得到将数字提取并用空格分隔的结果。

  • 1
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 1
    评论
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值