Permet uniquement la gestion des expressions régulières.
Le code suivant montre comment utiliser l'objet RegExp.
Function RegExpTest(patrn, strng)
Dim regEx, Match, Matches ' Crée la variable.
Set regEx = New RegExp ' Crée une expression régulière.
regEx.Pattern = patrn ' Définit les critères.
regEx.IgnoreCase = True ' Ignore la casse.
regEx.Global = True ' Définit le champ d'application.
Set Matches = regEx.Execute(strng) ' Lance la recherche.
For Each Match in Matches 'Itère la collection Matches.
RetStr = RetStr & "Correspondance trouvée à la position "
RetStr = RetStr & Match.FirstIndex & ". La valeur de la correspondance est '"
RetStr = RetStr & Match.Value & "'." & vbCRLF
Next
RegExpTest = RetStr
End Function
MsgBox(RegExpTest("is.", "IS1 is2 IS3 is4"))
Global, propriété | IgnoreCase, propriété | Pattern, propriété
Execute, méthode | Replace, méthode | Test, méthode