VBA Juhendaja Word

Visual Basic for Applications (VBA) on programmeerimiskeel, mida kasutatakse ülesandeid automatiseerida Microsoft Word.Visual Basic, mida saate teha mis tahes toiming, mida saab teha Word ilma Visual Basic, kuid kiiremini.See kehtib eriti operatsioone, mis sisaldavad palju alamülesannetele, näiteks otsida sõna, millele järgneb sõna valik, millele järgneb formaati.


Järgmised proovi kood näitab, kuidas saab hakata VBA, et saada praktilisi lahendusi ühise tekstitöötluse küsimusi.

Sisestage Näide kood IDE

  • avama MS Word ja minna Visual Basic IDE (integreeritud arenduskeskkond) pooltvajutades alt-F11.

    In koodi aken, sisestage järgmine programmi koodi.

    Public Sub mac ()
    Dim r As Range
    Dim w Nagu Range
    Dim i As Integer
    Dim t Nagu String

    Options.DefaultHighlightColorIndex

    Set r = Selection.Range

    r.StartOf (wdParagraph)

    r.Expand wdParagraph

    r.Find.ClearFormatting
    r.Find.Replacement.ClearFormatting
    r.Find.Replacement.Highlight = True
    Mis r.Find
    .Text = "on"
    .Replacement.Text = "on"
    .Forward = True
    .Wrap = wdFindStop
    .Format = True
    .MatchCase = False
    .MatchWholeWord = True
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
    lõpe
    r.Find.Execute Vahetage:= wdReplaceAll

    End Sub

    Saad tunnet, mida see programm teha märgata teatud märksõnade see: punkt, leida ja valikut, näiteks.Programm leiab ja toob esile kõik esinemistest sõna saab määrata, mida hetkel lõikes.

    Teade need kaks rida koodi:
    .Text = "on"
    .Replacement.Text = "on"

    Need read öelda sõna, mida otsida.Asemel need "on" s, sisestage iganes sõna või teksti soovid otsida ja tuua.

töötab programm

  • Tagasi sõna (alt-F11), ja sisesta mõned punktid väärt teksti.Need punktid peaksid sisaldama vähemalt paar esinemistest eelnimetatud otsingusõna olete valinud.

    Kui olete lõpetanud teksti sisestamist asetage kursor sees mõni punktid.Käivita programm: valida alt-F8 avab makromajandusliku kordus aknas.Valige "mac" makro ja vajutage Käivita.Kui Word leiab mõne juhtumeid otsingusõna teile määratud, et punkt, mis sisaldab kursor, see toob esile sõna.

Aru järgi kohandada seda

  • Kirjutamise ühe skripti võivad parandada oma töökorraldust natuke.Aga kui sa mõistad, kuidas skript töötab, siis hakkavad parandama oma töökorraldust oluliselt, ja igavene alusel.

    Tagasi Visual Basic IDE ja vaadata programmi koodi sees mac funktsiooni.Pane tähele, kuidas mac funktsiooni saab praeguse lõikes teha oma asendamisoperatsiooni: vaadeldakse valimiskomisjoni objekti, mis tähistab parajasti valitud teksti või sisestuspunktis.Siis, kasutades Word sisemise esitus dokumendi, skript "suure hüppe" alates torke punkt algust lõik, mis sisaldab kursorit.

    Selline liikumine on teinud võimalikuks võrgustik ühendused sees VBA Word.Praegune valik on seotud praeguse sõna, praegune lause ja praegune lõige.Täpsemalt, mac linke või leapfrogs praeguse valiku alguse praegune lõige (Set r = Selection.Range ja r.StartOf (wdParagraph)).Sel hetkel, r on ainult sisestuspunktis, kuid me tahame seda suunata kogu lõikes, nii et me laiendada seda r.Expand wdParagraph.Kui soovite otsida lihtsalt praegune lause asemel praeguse lõigu asendada kõik juhtumid wdParagraph programmi kood wdSentence.

585
0
2
Visual Basic Programmeerimine