Excel如何从一个单元格中提取中英文数字

在职业或学术环境中，混杂着中文、英文和数字的单元格处理起来繁琐，逐个复制易出错，亟需高效方法。

1、 1、进入VBA编辑面板打开Excel，按Ctrl+F11，快速进入VBA编辑面板，初学者可以从开发工具——Visual Basic进入VBA，如图：

2、 2、插入模块VBA菜单栏——插入——模块，插入一个新模块，用来编写VBA代码，如图：

3、 3、输入代码输入以下代码：Function MyGet(Srg As String, Optional n As Integer = False)Dim i As IntegerDim s, MyString As StringDim Bol As BooleanFor i = 1 To Len(Srg)s = Mid(Srg, i, 1)If n = 1 ThenBol = Asc(s) < 0ElseIf n = 2 ThenBol = s Like "[a-z,A-Z]"ElseIf n = 0 ThenBol = s Like "#"End IfIf Bol Then MyString = MyString & sNextMyGet = IIf(n = 1 Or n = 2, MyString, Val(MyString))End Function然后保存，如图：