去除excel单元格中的中文汉字
工具–宏–visual basic编辑器–插入模块–拷贝以下内容，
然后在表格里面填上公式 【=除汉字(A1)】，A1是“E2300中国3200S”等所在的单元格
Function 除汉字(rng As Range)
s = Len(rng.Text)
For i = 1 To s
txt = StrConv(Mid(rng.Text, i, 1), vbNarrow)
txt2 = StrConv(Mid(rng.Text, i, 1), vbWide)
If txt <> txt2 Then
除汉字 = 除汉字 & Mid(rng.Text, i, 1)
Next i
End Function
