Visual Basic for Applications ( VBA ) är ett programmeringsspråk som används för att automatisera uppgifter i Microsoft Word . Med Visual Basic kan du göra någon operation som du kan göra i Word utan Visual Basic , men snabbare . Detta gäller särskilt för verksamheter som omfattar många underaktiviteter , t.ex. en sökning efter ett ord , följt av ordet val , följt av formatting.The följande exempelkod visas hur du kan börja använda VBA för att ge praktiska lösningar för vanliga problem ordbehandling . Ange Exempel Koden i IDE
Öppna MS Word och gå till Visual Basic IDE ( integrerad utvecklingsmiljö ) genom att trycka på alt - F11 .
Koden fönstret , skriv in följande programkod .
Public Sub mac ( ) Dim r Som RangeDim w Som RangeDim i Som IntegerDim t As String
Options.DefaultHighlightColorIndex
Set r = Selection.Range
r.StartOf ( wdParagraph ) katalog
r.Expand = TrueWith r.Find.Text = " är " . Replacement.Text = " är " . Forward = True.Wrap = wdFindStop.Format = True.MatchCase = False.MatchWholeWord = True.MatchWildcards = False.MatchSoundsLike = False.MatchAllWordForms = FalseEnd Withr.Find.Execute Ersätt : = wdReplaceAll
End Sub
Du kan få en känsla av vad detta program kommer att göra genom att märka vissa sökord inom det : punkt , hitta och urval , för exempel. Programmet hittar och markerar alla förekomster av ett ord du anger , inom det aktuella stycket
Notice dessa två rader i koden : . . Text = " är " Replacement.Text = " är "
< . p > Dessa rader talar om Word vad man ska leta efter . I stället för de " är " s , ange vilket ord eller text du vill söka efter och markera . Addera Köra programmet
Return
till ordet ( alt - F11 ) , och skriv in ett par stycken till ett värde av text . Dessa punkter bör innehålla åtminstone några förekomster av ovannämnda sökord du har valt .
När du har skrivit in texten , placera markören inuti någon av de punkterna . Kör programmet : välj Alt- F8 för att få upp makro - replay fönstret . Välj " mac " macro , och tryck på Kör . Om Word hittar alla förekomster av sökordet du angav i stycket med markören , kommer det markera ordet .
Förstå det att skräddarsy den
skriva in ett enda skript kan förbättra ditt arbetsflöde lite . Men om du förstår hur manuset fungerar , börjar du att förbättra ditt arbetsflöde kraftigt , och på en evig grund .
Tillbaka till Visual Basic IDE och titta på programkoden inuti mac -funktionen . Lägg märke till hur den mac -funktionen blir det aktuella stycket att göra sitt ersättningsoperationen : det ser ut på objektet Selection , som representerar den valda texten eller insättningspunkten . Därefter använder Word interna representation av dokumentet , skriptet " leapfrogs " från den aktuella insättningspunkten till början av stycket som innehåller insättningspunkten . Denna typ av rörelse
möjliggjorts genom ett nätverk av förbindelser insidan VBA för Word . Det aktuella valet är kopplad till det aktuella ordet , den aktuella meningen och aktuella stycket . Specifikt mac länkar eller leapfrogs från den aktuella markeringen till början av det aktuella stycket ( Set r = Selection.Range och r.StartOf ( wdParagraph ) ) . Vid denna punkt , är r bara en insättningspunkt , men vi vill att det ska hänvisa till hela stycket , så vi utöka det med r.Expand wdParagraph . Om du vill söka bara den aktuella meningen i stället för det aktuella stycket , ersätta alla förekomster av wdParagraph i programkoden med wdSentence .