这个必须使用自定义函数：
1、在工作表内按alt + F11，打开VBE编辑器
2、在左上方工程管理器中点击右键——插入模块
3、在右边白色的代码窗口中粘贴以下代码：
Function del(str As String) As String
Dim objRegExp As Object
Set objRegExp = CreateObject("VBSCRIPT.REGEXP")
With objRegExp
.Global = True
.Pattern = "[\u4e00-\u9fa5]"
del = .Replace(str, "")
End With
End Function
4、假设你的数据在A列，现在你在B1中输入=del(a1) 就可以取到剔除汉字后的值
另外再猜测一下，你的意思可能是只保留前方的型号，而后面的商品名称去除，如果这样的话也可以直接在B1使用公式：
=LEFT(A1,MATCH(" ",MIDB(A1,ROW($1:$100),1),)-1)
输入完公式以后同时按ctrl + shift + 回车键结束
