Cómo Excel combina expresiones regulares y les da color

1. Cree un nuevo libro en blanco, presione la combinación de teclas de método abreviado Alt F11 en la interfaz de la hoja de trabajo o haga clic derecho en cualquier etiqueta de la hoja de trabajo y haga clic en "Ver código" en el menú contextual emergente. para ingresar al entorno de edición de VBA, como se muestra a continuación:

2 Copie y pegue el siguiente código en la "Ventana de código":

Sub RegTest()

'Definir expresiones regulares Objeto de fórmula

Dim oRegExp As Object

'Definir objeto de colección de cadenas coincidentes

Dim oMatches As Object

'Crear expresión regular

'Define la variable de texto para realizar la búsqueda regular

Dim sText As String

sText = "Este es un programa de muestra, un código para una expresión regular b "

Establecer oRegExp = CreateObject("vbscript.regexp")

Con oRegExp

'Establece si coincidirán todos los elementos coincidentes, Verdadero significa coincidir todos, Falso Indica que solo coincide el primer elemento coincidente

.Global = True

'Establece si se distingue entre mayúsculas y minúsculas, Verdadero significa que no se distingue entre mayúsculas y minúsculas, False significa que se distingue entre mayúsculas y minúsculas

.IgnoreCase = True

'Establece el patrón de caracteres que se encontrará

.Pattern = "[\u4e00-\u9fa5] "

'Determinar si es posible Encontrar el carácter coincidente y devolver Verdadero si es posible

MsgBox .Test(sText)

'Realizar una búsqueda regular en la cadena y devolver el conjunto de todas las búsquedas valores Si no se encuentra, entonces está vacío

Establecer oMatches = .Execute(sText)

'Reemplazar todos los caracteres coincidentes encontrados por la expresión regular en la cadena con otros caracteres

MsgBox Reemplazar(sText, "")

Terminar con

Establecer oRegExp = Nada

Establecer oMatches = Nada

End Sub

Como se muestra en la siguiente figura:

3. La ejecución del código anterior eliminará todos los caracteres chinos en la variable ?sText = "Este es un código de programa de muestra for v una expresión regular b". Solo se devolverán "vba" 3 caracteres en inglés, como se muestra en la siguiente figura. Entre ellos, .Pattern = "[\u4e00-\u9fa5] " significa hacer coincidir todos los caracteres chinos. El atributo Pattern es el núcleo del objeto de expresión regular. Cuando necesita realizar otras búsquedas y reemplazos, generalmente solo necesita cambiar el. Atributo de patrón.

4. Algunos patrones regulares comunes son los siguientes:

[0-9] significa hacer coincidir cualquier número

[a-zA-Z] significa hacer coincidir cualquier número Una letra inglesa

[\u4e00-\u9fa5] significa coincidir con cualquier carácter chino