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 "
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 .
Previous:nothing Next:hur man kommer åt och hitta alla poster som innehåller mata in text