Saltar al contenido

¿Expresiones regulares en MS Access VBA?

Recuerda que en la informática un problema suele tener diferentes soluciones, no obstante nosotros te enseñaremos lo más óptimo y mejor.

Solución:

Puede usar el objeto Regex de VBScript agregando una referencia a la biblioteca de expresiones regulares de Microsoft VBScript.

Ejemplo de uso:

Dim szLine As String  
Dim regex As New RegExp  
Dim colregmatch As MatchCollection  

With regex  
   .MultiLine = False  
   .Global = True  
   .IgnoreCase = False  
End With  

szLine = "Analyzed range (from-to)  10  100"  

regex.Pattern = "^Analyzed range"  
If regex.Test(szLine) Then  
   regex.Pattern = ".*?([0-9]+).*?([0-9]+)"  
   Set colregmatch = regex.Execute(szLine)  

   'From  
    Debug.Print colregmatch.Item(0).submatches.Item(0)  
    'To  
    Debug.Print colregmatch.Item(0).submatches.Item(1)  
End If  

Fuente: http://mark.biek.org/blog/2009/01/regular-expressions-in-vba/

Puedes usar CreateObject("vbscript.regexp") o simplemente haga referencia a la biblioteca de secuencias de comandos.

Te mostramos reseñas y puntuaciones

Si guardas algún reparo y forma de mejorar nuestro reseña puedes escribir una interpretación y con placer lo analizaremos.

¡Haz clic para puntuar esta entrada!
(Votos: 0 Promedio: 0)



Utiliza Nuestro Buscador

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *