作者:乔山办公网日期:
返回目录:excel表格制作
您好,去掉单元格中的数字e68a84e799bee5baa6e997aee7ad94362字符可以用VBA来实现。这个是去掉单元格中所有数字的
Public Sub a()
Dim a As String
x = Range("A65536").End(xlUp).Row
For i = 1 To x
m = Len(Cells(i, 1))
For k = 1 To m '使用for循环将单元格内字符历便
If IsNumeric(Mid(Cells(i, 1), k, 1)) = False Then
a = a & Mid(Cells(i, 1), k, 1) '将得到的数值赋值给变量a
End If
Next
Cells(i, 2) = a
a = ""
Next
End Sub
如果只是去掉最后面的数值,可以用下面的程序。
Public Sub a()
Dim a As String
x = Range("A65536").End(xlUp).Row
For i = 1 To x
m = Len(Cells(i, 1))
a = Cells(i, 1)
For k = 1 To m
If IsNumeric(Right(a, 1)) = True Then
a = Left(Cells(i, 1), m - 1)
m = Len(a)
End If
Next
Cells(i, 2) = a
a = ""
Next
End Sub
1、首先我们打开excel办公软件,通过指定内容作为样例进行使知用
2、在开始菜单中默认选择开始选项道,其中选择智能工具箱
3、首先我们选中要处理的单元格区域
4、然后选择工具栏中单元格处理,在下拉三角中选择保留内容
5、弹出批量提取内窗口,其中提取类型选择数字,因为上面我们提到中文和数字混合容只保留数字,勾选数字并确定
一、首先,打开excel表格程序百,在程序中打开要去除文字保留文字的表格。
二、然后,在点击“开始”在开始菜单中度点击“智能工具箱”,点击打开。
三、然后,选中要去除文字保留数字的单元格区域。
四、然后,在上方的“工具栏”中点击单元格处理,在下拉菜单中选择“保留内容”,点击打开。
五、然后,在弹专出的对话框中勾选“数字”,点击确定保存设置。
六、最后,即可属看到Excel表格中取出文字保留数字完成,问题解决。