Excel正则化|极客笔记

Excel正则化

在Excel中，正则表达式（regular expression）也称为正则化（regularize），是一种强大的文本处理工具。通过使用正则表达式，我们可以在Excel中快速有效地进行文本匹配、搜索、替换等操作。本文将介绍如何在Excel中使用正则表达式进行文本处理，并给出一些实际应用示例。

什么是正则表达式

正则表达式是一种用来描述字符串模式的表达式。它可以进行文本的匹配、搜索、替换等操作。正则表达式由字符和操作符组成，常用操作符包括.（匹配任意一个字符）、*（匹配零个或多个前面的字符）、+（匹配一个或多个前面的字符）等。通过结合这些操作符，我们可以构建复杂的匹配模式。

在Excel中，我们可以使用正则表达式来对单元格中的文本进行处理。Excel本身并不直接支持正则表达式，但是可以通过一些函数配合实现正则匹配操作。

在Excel中使用正则表达式

在Excel中，我们可以通过宏来实现正则表达式的功能。下面是一个示例代码，演示了如何使用VBA的RegEx对象来执行正则匹配：

Sub RegExpDemo()
    Dim regEx As Object
    Set regEx = CreateObject("VBScript.RegExp")

    regEx.Pattern = "[0-9]+"

    Dim cell As Range
    For Each cell In Selection
        If regEx.Test(cell.Value) Then
            Debug.Print cell.Value & " 包含数字"
        Else
            Debug.Print cell.Value & " 不包含数字"
        End If
    Next cell
End Sub

在上面的示例代码中，我们首先创建了一个RegEx对象，然后定义了一个正则表达式模式[0-9]+，用来匹配一个或多个数字。然后遍历选定区域的每个单元格，使用Test方法判断单元格的内容是否符合正则表达式，然后输出相应的信息。

运行以上代码后，如果选定的单元格中包含数字，则输出“包含数字”，否则输出“不包含数字”。

实际应用示例

1. 提取邮件地址

假设我们有一个包含各种信息的文本字符串，其中包含多个邮件地址。我们希望提取出所有的邮件地址并显示在新的单元格中。这时可以使用正则表达式来实现：

Sub ExtractEmail()
    Dim regEx As Object
    Set regEx = CreateObject("VBScript.RegExp")

    regEx.Pattern = "\b[A-Za-z0-9._%+-]+@[A-Za-z0-9.-]+\.[A-Z|a-z]{2,}\b"

    Dim cell As Range
    For Each cell In Selection
        Dim matches As Object
        Set matches = regEx.Execute(cell.Value)

        Dim email As String
        For Each match In matches
            email = email & match.Value & vbCrLf
        Next match

        cell.Offset(0, 1).Value = email
    Next cell
End Sub

在以上代码中，我们定义了一个正则表达式模式，用来匹配邮件地址。然后遍历每个单元格的内容，使用Execute方法获取匹配的结果，将匹配的邮件地址以换行符分隔保存到相邻的单元格中。

2. 替换手机号码

假设我们有一个包含手机号码的文本字符串，其中手机号码格式可能有多种情况。我们希望将所有的手机号码格式统一为13712345678的格式。这时可以使用正则表达式来实现：

Sub ReplacePhoneNumber()
    Dim regEx As Object
    Set regEx = CreateObject("VBScript.RegExp")

    regEx.Pattern = "\b(0|86|\+86)?1[345789]\d{9}\b"

    Dim cell As Range
    For Each cell In Selection
        cell.Value = regEx.Replace(cell.Value, "13712345678")
    Next cell
End Sub

在以上代码中，我们定义了一个正则表达式模式，用来匹配手机号码。然后遍历每个单元格的内容，使用Replace方法将匹配的手机号码替换为13712345678。