Ako odstrániť prečiarknutie textu v dokumente v jazyku VBA

Vedieť , ako odstrániť prečiarknutie textu s VBA vám umožní rýchlo vymazať tento prípadný rušivý obsah z dokumentu . Vzhľadom k tomu , VBA nie je vyžadovaný žiadny zásah užívateľa , aby túto úlohu vykonať , môže tak urobiť bez ľudskej chyby . VBA funkcie jadrom tohto projektu je " Font " vlastnosť " rozsah " triedy , z ktorých všetky slová vo vašich dokumentoch sú členmi . " Font " vlastnosť má niekoľko čiastkových vlastností , ktoré uchovávajú všetko formátovanie , ktoré aplikujete na slová , ako je prečiarknutie efektu . Návod dovolená 1

Stlačte tlačidlo " Control " a " N " vytvoriť nový dokument , zadajte pár slov do neho . Dvakrát kliknite na jedno zo slov , vyberte ho a stlačte tlačidlo " Control " a " D " súčasne sa zobrazí dialógové okno " Písmo " . Kliknite na políčko " prečiarknutie " umiestniť tento efekt na slovo , potom kliknite na tlačidlo " OK " zatvorte dialógové okno .
2

Kliknite na " Súbor " kartu v " Options " položku, kliknite na tlačidlo " vlastné " velenie " Stuha " Kategórie panelu . Tieto akcie sa dostanete na voľbu pre umožnenie zobrazenie záložke " Vývojár " , ktorá je držiteľom tlačidlá pre prácu s VBA .
3

Kliknite na políčko " Developer " , aby sa slovo zobrazí " developer " kartu , potom kliknite na tlačidlo " OK " zatvorte " Možnosti " v dialógovom okne .
4

kliknite na tlačidlo " Developer " kartu je " Visual Basic " , otvorte Visual Basic vývojové prostredie , ktoré vám umožní písať , upravovať a ladiť programy .
5

Kliknite na príkaz v ponuke " Vložiť " je " modul " pre vytvorenie novej okno pre zadanie programy , vložte nasledujúci program do nového okna . Tento program číta " prečiarknutie " majetok každého slova v aktuálnom dokumente , a vypúšťa slovo , ak hodnota tohto majetku je " To je pravda . " Program používa funkciu slovo je " Delete " , čo v jazyku VBA programátori nazývať " metóda " , vykonávať odstránenie .

Public Sub delStrikeThrough ( )

Dim w

S ActiveDocument

pre každé w . Slová

Ak w.Font.StrikeThrough = True Then

w.delete

End If

Ďalšie

End With

End Sub
6

kliknite na niektorú z výkazov programu , kliknite na tlačidlo menu " Debug " je " krok do " príkaz , ktorý umožňuje môžete spustiť program jeden príkaz naraz . Spustenie programu túto cestu vám pomôže pochopiť dopad jednotlivých tvrdení .
7

Stlačte tlačidlo " F8 " opakovane postúpiť zvýraznenie do ďalšieho programového vyhlásenia . Všimnite si , že program vykonáva iba " Delete " vyhlásenie raz - na jediné slovo s prečiarknutie písma , ktorú ste použili v kroku jedna
8

Pokračujte stlačením tlačidla " F8 " , kým zvýraznenie zmizne , indikuje . program bol ukončený .
9

Kliknite na ikonu " Word " na paneli úloh systému Windows sa vráťte do aplikácie Word . Všimnite si , že slovo sa prečiarknutie písma bol zmazaný .

• Predchádzajúca strana: Ako vložiť záznam do VBA databázy 
• Ďalšia strana: Ako odinštalovať aplikácie pomocou PowerShell