Vi kan velge alle tomme avsnitt én etter én
Trinn 1:?. Velge ett tomt avsnitt
Trinn 2. : Hold Ctrl for å velge andre tomme avsnitt
Men hvis dokumentet har mer enn 100 tomme avsnitt, er det smertefullt og tidkrevende å velge alle tomme avsnitt én etter én
Velg alle tomme avsnitt.. med VBA
Heldigvis, i stedet for å velge alle tomme avsnitt én etter én, vi kan bruke VBA til å velge alle tomme avsnitt i Word. Dette vil være mye enklere
VBA-kode kan velge alle tomme avsnitt, gjør du følgende:
Trinn 1:. Trykk Alt + F11 for å åpne VBA vinduet;
Trinn 2 Klikk Module fra kategorien Sett inn, sette inn koden i Module vinduet;
Trinn 3:. Klikk på Kjør-knappen eller trykk F5 for å bruke VBA
VBA-kode for å velge tomme tomme avsnitt: Merk: hvis dokumentet er svært lang, det vil ta flere minutter å velge de tomme avsnitt. Er du interessert i å vite en mye enklere måte enn å bruke VBA-kode for å velge alle tomme avsnitt i Ord? Og det er Kutool for Word. Etter at du har installert Kutool for Word, kan du velge alle tomme avsnitt med ett klikk. Kutools for Word, en hendig add-in, omfatter grupper av verktøy for å lette arbeidet ditt og forbedre din evne til behandling Word-dokument. Gratis prøveversjon i 45 dager! Få det nå Klikk Kutools > Klikk Avsnitt Velg i Avsnitt-gruppen > Klikk på Velg alle Blank Avsnitt fra nedtrekkslisten. Se skjermbilde: Merk: Hvis du bare vil velge alle objekter fra et utvalg av dokumentet, kan du velge en del av dokumentet først, og deretter bruke dette verktøyet For mer detaljert informasjon om Velg Blanke ledd Kutools for Word. vennligst besøk: Paragraf Velg funksjonen beskrivelse Anmeldelser
Sub SelectBlankParagraph ()
Dim tempTable Som ledd
Application.ScreenUpdating = False
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
For Hver tempTable I ActiveDocument.Paragraphs
Hvis Len (tempTable.Range.Text) = 1 Så tempTable.Range.Editors.Add wdEditorEveryone
Neste
ActiveDocument.SelectAllEditableRanges wdEditorEveryone
< em> ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
Application.ScreenUpdating = True
End Sub
Velg alle innebygde objekter med Kutool for Word
.