一、Excel如何剔除中文
如果不含第二列，使用公式处理有点难度，下边就分享一下VBA程序代码处理。
①程序代码如下：
Sub Del321()
Dim i1, i2, i3, i4, i5
On Error Resume Next '忽略可能出现的错误
Set mysheet1 = ThisWorkbook.Worksheets("Sheet1") '定义Sheet1
For i1 = 1 To 10000 '第1到10000行
If mysheet1.Cells(i1, 1) <> "" Then '单元格不是空白时
i2 = Len(mysheet1.Cells(i1, 1)) '获取单元格字符长度
For i3 = 1 To i2
If Asc(Mid(mysheet1.Cells(i1, 1), i3, 1)) < 0 Then '如果是汉字
mysheet1.Cells(i1, 3) = Left(mysheet1.Cells(i1, 1), i3 - 1) '截取字符
Exit For '退出For循环
End If
If i3 = i2 Then '均不含汉字
mysheet1.Cells(i1, 3) = Left(mysheet1.Cells(i1, 1), i3)
Exit For
End If
Next
End If
Next
End Sub
②执行之前如下截图：
③执行之后如下截图：
二、excel上如何一键清除单元格里的中文
1.
excel中使用tab键是跳转单元格：下一单元格或者上一单元格（与shift键同时使用）。
这种情况无论是单击选定整个单元格还是双击选定内部的文本。
2.
如果只是出于增加空格的目的，可分别打入空格。
3.
如果非要输入tab键在单元格中，可以使用ascii码。
4.
水平tab键对应的ascii码为9，则可通过char(9)在excel中打出该字符。
5.
该字符在excel单元格中并不显示，但它实实在在的占有一个字符。可在excel内进行复制粘贴、查询和替换等操作。
6.
查找时需要在查询栏使用小键盘数字9+alt键输入该字符。
7.
当粘贴到word中与一空格等同,粘贴到记事本中与tab键完全等同。
8.
可以在excel中分别输入如下字符进行验证。
a1="a"&char(9)&"b"
a2=len(a1)
9.
从word或记事本中复制到excel中的方式均是复制了一个空格，而无法实现复制tab键的目的。
三、如何批量删除excel的汉字
1、演示使用软件为office
Excel以及文字处理软件word，软件版本为office家庭和学生版2016.
2、首先打开Excel电子表格，可以看到表格中包含了汉字的数据，我们需要将汉字全部删除，此时我们将这些数据全部复制。
3、然后打开word文字处理软件，并粘贴我们复制的表格数据。
4、使用快捷键CTRL+h，调出查找和替换窗口，在该窗口中我们输入查找内容为“[!^1-^127]”，然后点击使用通配符，最后点击全部替换即可删除所有的汉字。
5、然后将处理完成的数据复制粘贴回excel电子表格，可以看到我们已经成功的批量删除了选中位置所有的汉字。
