VBA中正则表达式如何首尾锚定?

时间:2026-02-15 22:17:39

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

VBA中正则表达式如何首尾锚定?

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

VBA中正则表达式如何首尾锚定?

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

VBA中正则表达式如何首尾锚定?

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

VBA中正则表达式如何首尾锚定?

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

End Sub

VBA中正则表达式如何首尾锚定?

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

VBA中正则表达式如何首尾锚定?

7、在VBA窗口,点击”运行“按钮,运行一下编写的代码!

VBA中正则表达式如何首尾锚定?

8、我们会看到”字母+数字“形式被筛选并置于B栏!

VBA中正则表达式如何首尾锚定?

© 2026 一点资料
信息来自网络 所有数据仅供参考
有疑问请联系站长 site.kefu@gmail.com