|
Utilisez la classe d'expression régulière VBScript pour permettre à vos programmes VBA d'effectuer des recherches d'expressions régulières . Les expressions régulières sont des modèles de texte qui peuvent vous aider à rechercher des chaînes avec une syntaxe complexe dans vos documents Office . Ces chaînes comprennent les adresses électroniques , numéros de téléphone et les champs de texte avec des critères spécifiques que vous avez définies dans une base de données Excel ou Access. Pour apprendre la syntaxe d'expression régulière spécifique , voir la page Zytrax "Regular Expression " Web ou une ressource similaire. Assurez-vous de tester vos programmes VBA qui utilisent des expressions régulières sur plusieurs chaînes d'entrée pour être sûr que vous avez écrit vos modèles d'expressions régulières correctement . Instructions
1 ouvrir l'une des applications Office , tels que Word , Excel ou Access. Appuyez sur "Alt" et "F11" simultanément pour entrer dans l'environnement de programmation VBA, puis cliquez sur le menu "Insertion " rubrique. Cliquez sur l'option "Module" pour créer une nouvelle fenêtre dans laquelle vous pouvez entrer programmes VBA
2 Type de les instructions suivantes pour créer un sous-programme dans lequel utiliser les expressions régulières : .
sous RegularExpressionTester ( ) End Sub
3 Tapez la déclaration suivante avant l'instruction "End sub" de votre programme pour créer l'objet d'expression régulière à partir de VBScript. Cette instruction crée l'objet dont les fonctions effectuer des recherches d'expressions régulières .
Set objRegExp = CreateObject (" VBScript.RegExp " )
4 Type de " objRegExp.Global = true" si vous voulez que votre expression régulière pour correspondre à une chaîne juste sur la première occurrence de la chaîne . Tapez " objRegExp.Global = false" si vous voulez faire correspondre à toutes les occurrences de la chaîne. Par exemple, si vous êtes à la recherche pour le caractère "@" dans une adresse e-mail et je veux juste trouver la première instance de ce personnage , réglez " globale" à "false".
5 Type " objRegExp.IgnoreCase = true" si vous voulez que votre expression régulière pour ignorer la casse lors de la recherche d'une chaîne. Définissez cette propriété à false si vous devez le cas de la chaîne que vous êtes à la recherche de correspondre au modèle d'expression régulière. Par exemple, si vous êtes validation des adresses e-mail, qui ne sont pas sensibles à la casse , définissez cette propriété à "true".
6 type " objRegExp.Pattern =" puis tapez le modèle d'expression régulière que vous voulez faire correspondre avec une chaîne d'entrée . Par exemple, pour valider une adresse e-mail que vous pourriez inclure un modèle d'expression régulière comme " [az , AZ] * @ [az , AZ ] *. Com. " Ce modèle spécifie une chaîne de caractères alphabétiques avant et après " ; symbole @ . " Le modèle inclut également le domaine chaîne " . Com. Notez que les adresses e-mail réels peuvent être plus complexes que ce modèle simplifié.
7 type " Set regExpMatches = objRegExp.Execute ( strToSearch ) " pour appliquer votre modèle d'expression régulière à la chaîne d'entrée " strToSearch . " pour l'exemple de validation d'email , vous pouvez avoir préalablement défini la variable " strToSearch " au texte que vous voulez valider comme une adresse e-mail. Un exemple de déclaration de définir cette variable est " strToSearch =" ClarkKent@DailyPlanet.com ""
8 Type de «Si regExpMatches.Count = 0 alors " pour tester si l'objet expression régulière adapté n'importe quel texte dans votre chaîne d'entrée. Si votre texte d'entrée était " ClarKent@DailyPlanet.com " pour l'exemple de validation électronique, puis "Count" serait 1. Vous pouvez ensuite écrire une déclaration indiquant que le texte était une adresse email valide : . " MsgBox (" . Cette chaîne est une adresse email valide " ) "
< br >
|
