好吧问答库 > 如何去掉EXCEL表格里某一列的说有文字，保留符号，数字或英文，求高手解答！！急！！

如何去掉EXCEL表格里某一列的说有文字，保留符号，数字或英文，求高手解答！！急！！

2024年11月28日 01:33

有3个网友回答

网友（1）：

Sub aa()
Dim x, y, lChar, i, bb(), p, j, m
x = ActiveCell.Row
y = ActiveCell.Column
p = Len(Cells(x, y).Value)
ReDim bb(1 To p)
For i = 1 To p
bb(i) = Mid(Cells(x, y).Value, i, 1)
Next

For j = 1 To p
lChar = 65536 + Val(Asc(bb(j)))
If lChar >= 45217 And lChar <= 55289 Then
m = m + bb(j)
End If
Next
Cells(x, y).Value = m

选择此单元格，按alt+f8创建一个宏，把里面的东西全删了，复制代码进去，关闭后，回到excel再按alt+f8 点aa执行，试试吧

网友（2）：

你的意思是只去除文字是吗？请举个要求例子出来

网友（3）：

选择编辑菜单--清除--内容