Bruk VBScript regulære uttrykk klasse å aktivere VBA programmer for å utføre regulære uttrykk søk. Regulære uttrykk er tekst mønstre som kan hjelpe deg søke etter strenger med en kompleks syntaks i Office-dokumentene dine . Disse strengene inkluderer e-postadresser , telefonnumre og tekstfelt med bestemte kriterier du har definert i en Excel eller Access database. Hvis du vil vite den spesifikke syntaksen til regulære uttrykk , se Zytrax "Regular Expression " webside eller en lignende ressurs. Sørg for å teste dine VBA- programmer som bruker regulære uttrykk på mange forskjellige innspill strenger å være sikker på at du har skrevet din vanlige uttrykk mønstre riktig . Instruksjoner
en

Åpen en av Office- programmer, for eksempel Word , Excel eller Access. Trykk "Alt" og " F11 " samtidig for å gå inn i VBA programmering miljø , og klikk på "Insert "-menyen overskriften. Klikk på " Module" element for å skape et nytt vindu der du kan skrive VBA- programmer
2

Type følgende utsagn for å skape en subrutine som å bruke vanlige uttrykk : .

sub RegularExpressionTester ( ) End sub ​​
3

Skriv følgende uttalelse før " End sub ​​" statement av programmet for å lage det vanlige uttrykket objekt fra VBScript. Denne uttalelsen skaper objektet hvis funksjoner utføre regulære uttrykk søk.

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

Type " objRegExp.Global = true " dersom du vil at regulært uttrykk for å matche en streng bare på den første forekomsten av strengen . Type " objRegExp.Global = false " hvis du ønsker å matche på alle forekomster av strengen . For eksempel , hvis du søker etter " @ "-tegnet i en e-postadresse og bare ønsker å finne den første forekomsten av dette tegnet , satt "Global " til "false ".
5

Type " objRegExp.IgnoreCase = true " hvis du vil at regulært uttrykk for å ignorere tilfelle når matchende en streng. Angi denne egenskapen til false dersom du trenger tilfelle av strengen du søker å matche det vanlige uttrykket mønster. For eksempel , hvis du validere e-postadresser , som ikke er store og små bokstaver , setter denne egenskapen til "true ".
6

Type " objRegExp.Pattern =" skriv deretter inn regulært uttrykk mønster du ønsker å matche med en inngang streng. For eksempel , for å bekrefte en e-postadresse du kan inkludere et regulært uttrykk mønster som " [ az , AZ ] * @ [ az , AZ ] * . Com . " Denne oppskriften angir en streng med bokstaver før og etter en " ; @ "-symbolet . Mønsteret inneholder også domenet delstrengen " . Com . Merk deg at e-postadresser kan være mer komplisert enn dette forenklede mønster.
7

type "Set regExpMatches = objRegExp.Execute ( strToSearch ) " for å bruke din vanlige uttrykk mønster til inngangen strengen " strToSearch . "For e-validering eksempel kan du tidligere har satt variabelen" strToSearch "til teksten du ønsker å validere som en e-postadresse . En prøve uttalelse for å sette denne variabelen er " strToSearch = " ClarkKent@DailyPlanet.com " "
8

Type " Hvis regExpMatches.Count = 0 da " for å teste om det vanlige uttrykket objekt matchet alle tekst i din inngang streng. Hvis dine innspill teksten var " ClarKent@DailyPlanet.com " for e-validering eksempel, så «Greven» ville være en . Du kan deretter skrive en erklæring om at teksten var en gyldig e-postadresse : . " MsgBox ( " . Denne strengen er en gyldig e-postadresse ")"