EXCEL如何删除列中包含的数字
应该说清楚单元格中所有可能出现的格式,因为EXCEL中没有这个功能处理。
假如要处理的列为A列:
1 如果只是两个汉字再加数字,就按上面朋友说的方法,只是文本长度应该是2,公式为:=left(a1,2)
2 如果单元格长度有限,也可用公式增加一辅助列,再用复制-选择性粘帖,公式为:==IF(CODE(MID(E2,1,1))>57,MID(E2,1,1),"") &IF(CODE(MID(E2,2,1))>57,MID(E2,2,1),"") &IF(CODE(MID(E2,3,1))>57,MID(E2,3,1),"") ……
注意此公式长度要小于或等于A列中的最小长度,否则要加一个判断...全部
应该说清楚单元格中所有可能出现的格式,因为EXCEL中没有这个功能处理。
假如要处理的列为A列:
1 如果只是两个汉字再加数字,就按上面朋友说的方法,只是文本长度应该是2,公式为:=left(a1,2)
2 如果单元格长度有限,也可用公式增加一辅助列,再用复制-选择性粘帖,公式为:==IF(CODE(MID(E2,1,1))>57,MID(E2,1,1),"") &IF(CODE(MID(E2,2,1))>57,MID(E2,2,1),"") &IF(CODE(MID(E2,3,1))>57,MID(E2,3,1),"") ……
注意此公式长度要小于或等于A列中的最小长度,否则要加一个判断语句
3 用宏完成处理
=======
用宏处理
Sub 宏1()
Columns("A:A")。
Select ''这里假定为A列
For i = 0 To 9
Selection。
Replace What:=i, Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Next i
End Sub。收起