Question

Excel批量删除文字我想把文字删除只有数字,怎么批量

Answer 1

用vba结合正则运算编制一个自定义函数可以实现。举例说明.

例如有表格如图：

现要求取出每个单元格中的数字。

第一步：点击开发工具-visual basic。

第二步：插入模块。

第三步：在插入的模块中编制自定义函数，代码如下：

Function dqsz(A)

With CreateObject("vbscript.RegExp")

    .Global = True

    .ignorecase = True

    .Pattern = "[^0-9]"

dqsz = .Replace(A, "")

End With

End Function

第四步：在B2单元格输入公式：=dqsz(A2)。结果如图：

第五步：将b2的公式下拉至B4.结果如图：