excel 2007中,如何批量将单元格中的其它字符都删除,只留下数字.

答案:6 悬赏:0 手机版

解决时间 2021-02-24 18:23

提问者网友：寂寞撕碎了回忆
2021-02-23 20:47

最佳答案

五星知识达人网友：冷風如刀
2021-02-23 22:20

如图。A列单元格内容有数字、汉字、字母等，把其他字符都去掉，留下数字在B列。

　　1、右击标签栏，选择“查看代码”。

　　2、在代码窗口输入以下内容。
　　Sub a()
　　Dim i&, j%, str$
　　For i = 1 To [a65536].End(3).Row
　　str = ""
　　For j = 1 To Len(Range("a" & i))
　　If Mid(Range("a" & i), j, 1) Like "[0-9]" Then
　　str = str & Mid(Range("a" & i), j, 1)
　　End If
　　Next j
　　Range("b" & i) = str
　　Next i
　　End Sub

　　3、然后按F5运行即可。

全部回答

1楼网友：夜风逐马
2021-02-24 04:11

点中表格——单机右键——点击设置单元格——点文本，就可以把字符删除了

2楼网友：等灯
2021-02-24 02:54

如果数字是连续的（开头和结尾是非数字），可以用数组公式：
=IFERROR(MId(A1,MATCH(TRUE,ISNUMBER(--MId(A1,ROW($1:$100),1)),0),COUNT(--MId(A1,ROW($1:$100),1))),"")
按三键（CTRL+SHIFT+ENTER），完成公式，下拉。

3楼网友：时间的尘埃
2021-02-24 01:50

试试这个公式：
在B1输入：
=SUM(MId("0"&A1,LARGE(ISNUMBER(-MId(A1,COLUMN(1:1),1))*COLUMN(1:1),COLUMN(1:1))+1,1)*10^COLUMN(1:1))/10
因为是数组公式，所以要按CTRL+SHIFT+回车三键结束输入。
然后下拉填充
然后利用选择性粘贴将其粘贴到A列，删除B列即可

4楼网友：空山清雨
2021-02-24 00:44

在B1中输入或复制粘贴此公式
=LOOKUP(9E+307,--LEFt(A1,ROW(INDIRECT("1:"&LEN(A1)))))
下拉填充

5楼网友：毛毛
2021-02-23 23:41

假设你的数据在SHEET1的A列，将删除后的结果放在B列。

右键SHEET1,查看代码——粘贴如下代码——F5运行即可。Sub a()
Dim i&, j%, str$
For i = 1 To [a65536].End(3).Row
    str = ""
    For j = 1 To Len(Range("a" & i))
        If Mid(Range("a" & i), j, 1) Like "[0-9]" Then
           str = str & Mid(Range("a" & i), j, 1)
        End If
    Next j
    Range("b" & i) = str
Next i
End Sub

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息