怎么把excel表格的中文删除

1.EXCEL如何删除工作表中全部汉字

选中A列，在编辑里 将所替换的 标点、符号依次替换为空，即可。

================================================

打开excle 快捷键 Alt + F11 将下面代码复制到模块 运行

注意要替换的标点自己加进去

测试已经通过

Sub Del()

Dim reg As Object '定义reg为一个对象

Dim arr '定义一个动态数组

Dim i As Long, j As Long '分别定义i,j为长整型

i = Range("A65536").End(xlUp).Row '把A列非空的最后行数赋予给i

Columns("B").ClearContents '清空B列

arr = Range("A1:A" & i) '把A列的数据赋予给数组arr

Set reg = CreateObject("VBscript.RegExp") '调用正则表达式

With reg '定义表达式

.Global = True '匹配所有搜索项

.ignorecase = True '不区分大小写

.Pattern = "[。'；【】：“》，]" '正则表达式（所有标点）"

End With

For j = 1 To i '循环该区域

Range("B" & j) = reg.Replace(arr(j, 1)， ""） '进行根据模板替换字符串为空值

Next

End Sub

上面是自己做的

============================================================

找一个更好的的，更完美

Sub cc()

Dim i%, arr

arr = Sheet1.[a1].CurrentRegion

With CreateObject("VBSCRIPT.REGEXP")

For i = 1 To UBound(arr)

.Global = True

'.Pattern = "[^0-9A-z\u4e00-\u9fa5]"

.Pattern = "[^0-9A-Za-z一-龥]"

arr(i, 1) = .Replace(arr(i, 1), "")

Next

End With

Sheet1.[d1].Resize(UBound(arr)) = arr

End Sub