1、实例,A栏单元格中的字符排开形式有三种:“字母+数字、数字+字母、数字+字母+数字、字母+数字+字母”。如何将”字母+数字“形式筛选出来置于B栏呢?

2、在工作表中,点击菜单栏【开发工具】,在其工具栏内,点击【visual basic】!

3、会进入VBA编辑界面!点击菜单栏【插入】,在其下拉菜单中,选择【模块】!

4、会弹出模块编辑窗口!

5、在代码编辑窗口输入以下代码:
Sub test()
Set regx = CreateObject("vbscript.regexp")
arr = Range([a1], Range("a:a").Find("*", , , , , xlPrevious))
With regx
.Global = True
.ignorecase = True
.Pattern = "^[a-z]+\d+$"
For i = 1 To UBound(arr, 1)
Set mat = .Execute(arr(i, 1))
For Each m In mat
n = n + 1
Cells(n, 2) = m
Next
Next
End With

6、正则表达式开关锁定的符号是”^“,结尾锁定的符号为”$“


