Utilice la clase de expresiones regulares VBScript para que sus programas de VBA para realizar búsquedas de expresiones regulares. Las expresiones regulares son patrones de texto que pueden ayudarle a buscar cadenas con una sintaxis compleja en los documentos de Office . Estas cadenas incluyen direcciones de correo electrónico , números de teléfono y campos de texto con criterios específicos es posible que se hayan definido en una base de datos de Excel o Access . Para conocer la sintaxis específica de la expresión regular, consulte la página de Zytrax " expresiones regulares " Web o un recurso similar. Asegúrese de probar sus programas VBA que utilizan expresiones regulares en muchas cadenas de entrada diferentes para estar seguro de que usted ha escrito sus patrones de expresión regular correctamente. Instrucciones
1

abrir una de las aplicaciones de Office, como Word, Excel o Access . Pulse " Alt" y " F11 " al mismo tiempo para entrar en el entorno de programación VBA , a continuación, haga clic en el menú "Insertar " la partida. Haga clic en la opción " módulo" para crear una nueva ventana en la que para entrar en los programas de VBA
2

Tipo de las siguientes afirmaciones para crear un subprograma en el cual el uso de expresiones regulares : .

Sub RegularExpressionTester () End Sub
3

Escriba la siguiente declaración ante el "End Sub" declaración de su programa para crear el objeto de expresión regular de VBScript. Esta sentencia crea el objeto cuyas funciones realizar búsquedas de expresiones regulares.

Set objRegExp = CreateObject ( " vbscript.regexp ")
4

Type " objRegExp.Global = true" si usted quiere que su expresión regular para que coincida con una cadena justo en la primera aparición de la cadena . Tipo " objRegExp.Global = false" si desea hacer coincidir en todas las apariciones de la cadena. Por ejemplo, si usted está buscando para el carácter " @" en la dirección de correo electrónico y sólo quiero encontrar el primer caso de este personaje , ajuste " Mundial " al " falso".
5 Tipo

" objRegExp.IgnoreCase = true" si quieres que tu expresión regular de ignorar el caso cuando se compara una cadena. Establezca esta propiedad en false si usted necesita el caso de la cadena que está buscando para que coincida con el patrón de expresión regular. Por ejemplo , si usted está validar direcciones de correo electrónico , que no son mayúsculas y minúsculas , establezca esta propiedad a "true ".
6

Type " objRegExp.Pattern =" a continuación, escriba la patrón de expresión regular que desea hacer coincidir con una cadena de entrada . Por ejemplo , para validar una dirección de correo electrónico que puede incluir un patrón de expresión regular, como " [ az, AZ] * @ [ az, AZ] * . Com ". Este patrón especifica una cadena con caracteres alfabéticos antes y después " ; símbolo @ " . El patrón también incluye el dominio subcadena " . Com . Tenga en cuenta que las direcciones de correo electrónico reales pueden ser más compleja de lo que este modelo simplificado.
7

Tipo "Set regExpMatches = objRegExp.Execute ( strToSearch ) " para aplicar el modelo de expresión regular en la cadena de entrada " strToSearch . "Por ejemplo, la validación de correo electrónico , usted puede haber establecido previamente la variable" strToSearch " al texto que desea validar que una dirección de correo electrónico. Una declaración de ejemplo para establecer esta variable es " strToSearch =" ClarkKent@DailyPlanet.com " "
8

Type " Si regExpMatches.Count = 0, entonces " para poner a prueba si el objeto de expresión regular emparejado cualquier texto en la cadena de entrada. Si el texto de entrada era " ClarKent@DailyPlanet.com " para el ejemplo de validación de correo electrónico , a continuación, " Count" sería 1 . A continuación, puede escribir una declaración que indica que el texto es una dirección de email válida : . " MsgBox ( " . Esta cadena es una dirección de email válida ") "
< br >