Hur tar jag bort ett dokument VBA ord ?

Visual Basic for Applications ( VBA ) är ett programmeringsspråk för att automatisera de funktioner som finns i Microsoft Word och andra Office-program . VBA program, så kallade makron , lagras i Office- dokument , t. ex. Word -filer som slutar med ändelsen ” . DOCM . ” Word -användare kan ta ett antal metoder för att avgöra om ett dokument har makrokod , inklusive dem som använder VBA . När en användare får reda på att en handling har VBA -kod , kan hon använda Windows Explorer eller VBA -kod för att radera det . Förutom att minska risken för angrepp av makrovirus , borttagning av filer med VBA- projekt minskar mängden programmeringskod ett arbetslag har att hantera .
1.
Öppna Word och sedan öppna ett dokument som du tror kan innehålla makron . Observera att dokument vars filnamn som slutar på ” . DOCX ”får inte innehålla makron .
2 .
Tryck på ” Alt + F8 ”för att visa en lista med möjliga makrokod . Om inga poster visas i denna lista , har dokumentet utan makron . Om poster visas , stänga dokumentet , navigera till sin mapp med Utforskaren och sedan ta bort filen . Du kan använda VBA för att avgöra om en fil har en VBA- kod ( dvs makron ) och därefter radera filen med VBA .
3 .
Tryck på ” Alt-F8 ” för att öppna Visual Basic integrerad utvecklingsmiljö (IDE ) , klicka sedan på ” Infoga ” och ” Modul ” att producera ett nytt fönster för inmatning av programkod
4
Klistra in följande subrutinen in den nya koden fönstret. :

Sub vbaDelete ( )

somefile=” ”

Dokument . Öppna filnamn :=somefile , ConfirmConversions :=False , ReadOnly :=_

Falskt AddToRecentFiles :=False , PasswordDocument :=””, PasswordTemplate :=_

” ” , Återställ :=False , WritePasswordDocument :=””, WritePasswordTemplate :=””, _

Format :=wdOpenFormatAuto , XMLTransform :=””

MsgBox ActiveDocument. HasVBProject

End Sub
5 .
Ersätt texten ” ” i prospektet bara ges med filnamnet på ett dokument som du vill kontrollera för makron .
6 .
Kör programmet genom att klicka på någon av sina uttalanden och trycka på ” F5 ”. Den ” MsgBox ” uttalande i programmet kommer att visa ” HasVBProject ” egendom av dokumentet . Denna fastighet innehåller värdet ” true ” om handlingen makron och ” falskt ” om det inte gör det.
7 .
bort filen du har angett i ” somefile ” uttalande om Programmet har rapporterat att det innehåller makron
8
Skriv över ” MsgBox ” uttalande i det nuvarande programmet med denna kod : .

docFullname=ActiveDocument . Fullname

bHasVBACode=ActiveDocument. HasVBProject

ActiveDocument. Close

Om ( bHasVBACode ) Sen

Kill br docFullname
End If

De två första uttalandena registrera det öppna dokumentet är fullständig sökväg och värdet ( dvs ” sant ” eller ” false ” ) av dess ” HasVBProject ” egendom . Ett tredje uttalande stänger dokumentet . Den ” om-så ” uttalande blocket utför raderingen om ” HasVBProject ”är ” sant ”. Om ” somefile ” filen innehåller inga makrokod kommer VBA inte ta bort filen .
9 .
Kör programmet som du gjorde i steg 6 , öppna sedan mappen som innehöll den fil som anges i ” somefile ” uttalande . Filen, om det hade makron inte visas , ha tagits bort av din VBA-kod .