相信许多人经常会遇到一些不懂Excel的同事和老板，将一份好好的资料在Excel中填写的是乱七八糟，甚至有时在一个单元格中弄了N多个信息，又是中文，又是英文，又是数据。这里小编给大家分享一个不错的VBA，可以将单元格中混合数据包含中文、英文、数据信息单独提取出来。
混合数据预览
先看看混乱的数据吧！也许你的数据比这更乱，不过也没关系，我们可以轻松提取我们想要的中文或英文或数据。
开始提取
❶ 首先是【开发工具】-【代码】-【Visual Basic】；
❷ 在弹出的界面中点击【插入】-【模块】；
❸ 将下列代码复制到模块中。
Function MyGet(Srg As String, Optional n As Integer = False)
Dim i As Integer
Dim s, MyString As String
Dim Bol As Boolean
For i = 1 To Len(Srg)
s = Mid(Srg, i, 1)
If n = 1 Then
Bol = Asc(s) < 0
ElseIf n = 2 Then
Bol = s Like "[a-z,A-Z]"
ElseIf n = 0 Then
Bol = s Like "#"
End If
If Bol Then MyString = MyString & s
Next
MyGet = IIf(n = 1 Or n = 2, MyString, Val(MyString))
End Function
❹ 返回Excel界面，然后在需要提取单元格中录入：
【=myget(A2,1)】是提取所有中文
【=myget(A2,2)】是提取所有英文
【=myget(A2)】是提取所有的数据
本文地址：
http://www.njanyou.cn/news/1204.html
Tag：
Excel VBA 混合 数据 单元格
专业服务：
南京网站制作,
南京网站制作公司,
南京网站建设公司
联系电话：025-65016872
上一篇：
学生适合啥项目？赶紧看老司机带队如何月入10000+ ，请老鸟留点机会给学生
下一篇：
7年做到行业第一,饿了么在推广上做对了哪些事？
