Hvordan slette en tom Word side i VBA

Mens Microsoft Word ikke har en knapp eller verktøy for alle mulige scenario, kan du opprette brukerdefinerte makroer, biter av kjørbar kode, ved hjelp av Visual Basic for Applications (VBA). Makroer kan skreddersy Word til å passe dine behov. For eksempel, hvis du har et dokument ispedd blanke sider, kan det virke som det eneste alternativet er å gå gjennom dokumentet manuelt og slette disse sidene. Det er et annet alternativ: Bruk en VBA-makro for å gjøre beinet arbeidet for deg.

Bruksanvisning

1 Trykk "Alt" og "F11" sammen i Word-dokumentet du vil fjerne blanks fra å åpne Visual Basic Editor (VBE).

2 Klikk "Sett inn" og deretter "Module" for å sette inn en tom modul vindu.

3 Klipp og lim inn følgende kode i det tomme modulen vinduet:

Public Sub DeleteBlankPage ()

Selection.GoTo Hva: = wdGoToBookmark, Navn: = "\ side"

Hvis isBlankSelection Deretter

Selection.Delete

Slutt om

End Sub

Public Function BlankPageSelection ()

For hver c I Selection.Characters

Hvis (c <> vbCr Og c <> vbTab Og c <> vbFormFeed Og c <> "") Så

BlankPageSelection = False

Exit Function

Slutt om

neste

BlankPageSelection = True

End Function

4 Trykk "F5" for å kjøre rutinen og slett blanke sider fra dokumentet.

Hint

  • Du kan bruke den samme koden på et senere tidspunkt: Koden vil spare sammen med Word-dokumentet. Åpne VBE og klikk deretter på "DeleteBlankPage" fra sidepanelet til venstre. Trykk "F5" for å kjøre rutinen.