Hvordan fjernes tomme rækker og kolonner fra tabeller i Word?
Tomme rækker og kolonner i tabeller kan få dit Word-dokument til at se rodet og uorganiseret ud. Denne vejledning viser dig flere måder til effektivt at fjerne alle tomme rækker og kolonner fra tabeller i et Word-dokument.
Uanset om du foretrækker at gøre det manuelt, bruge VBA-kode eller bruge en et-klik-løsning, vil disse metoder hjælpe dig med at rydde op i dine tabeller og forbedre det overordnede udseende af dit dokument.
Fjern alle tomme rækker og kolonner manuelt fra tabeller
Microsoft Word har ikke en hurtig mulighed for at fjerne tomme rækker og kolonner, så du skal manuelt vælge og slette dem én efter én.
- Vælg den tomme række eller kolonne, du vil slette.
- Under TabelværktøjerKlik på Layout fane.
- I Rækker og kolonner gruppe, klik Slet rækker or Slet kolonner.
Fjern alle tomme rækker og kolonner fra tabeller ved hjælp af VBA-kode
Word's makrofunktion giver en langt mere bekvem måde at fjerne alle tomme rækker og kolonner fra tabeller i dokumentet. Du kan fjerne alle tomme rækker og kolonner som følger.
Trin 1: Tryk på "Alt-F11" at åbne Microsoft Visual Basic for Application-vinduet;
Trin 2: Klik Moduler på den indsatte fane, kopier og indsæt følgende VBA-kode i modulvinduet;
Trin 3: Klik derefter på Kør knappen for at anvende VBA.
VBA-koden for at fjerne alle tomme rækker og kolonner fra tabeller:
Sub DeleteEmptyTablerowsandcolumns()
Application.ScreenUpdating = False
Dim Tbl As Table, cel As Cell, i As Long, n As Long, fEmpty As Boolean
With ActiveDocument
For Each Tbl In .Tables
n = Tbl.Columns.Count
For i = n To 1 Step -1
fEmpty = True
For Each cel In Tbl.Columns(i).Cells
If Len(cel.Range.Text) > 2 Then
fEmpty = False
Exit For
End If
Next cel
If fEmpty = True Then Tbl.Columns(i).Delete
Next i
Next Tbl
End With
With ActiveDocument
For Each Tbl In .Tables
n = Tbl.Rows.Count
For i = n To 1 Step -1
fEmpty = True
For Each cel In Tbl.Rows(i).Cells
If Len(cel.Range.Text) > 2 Then
fEmpty = False
Exit For
End If
Next cel
If fEmpty = True Then Tbl.Rows(i).Delete
Next i
Next Tbl
End With
Set cel = Nothing: Set Tbl = Nothing
Application.ScreenUpdating = True
End Sub
Fjern alle tomme rækker og kolonner fra tabeller med et enkelt klik
Kutools for Word giver dig den mest bekvemme måde at fjerne alle tomme rækker og kolonner fra tabeller i dokumentet. Du skal bare klikke en gang, og Kutools for Words Delete Rows/Columns værktøj vil hurtigt fjerne alle tomme rækker og kolonner fra alle eller udvalgte tabeller for dig.
Efter installation af Kutools til Word, gør venligst som nedenfor:
1. klik Kutools Plus > Delete Rows/Columns på den Table rude.
2. Derefter vises en dialogboks, vælg det omfang, som du vil fjerne tabeller fra, i sektionen Se i, og tjek derefter Række mulighed og Tom række valgmulighed eller tjek Kolonne mulighed og Tom række mulighed, som du har brug for. Hvis du vil slette alle tomme rækker og kolonner, skal du anvende denne handling to gange.
Nu popper en dialog op for at minde dig om, hvor mange tabeller der er blevet behandlet, klik OK for at lukke, og de tomme rækker og kolonner er fjernet fra tabellerne.
Demo: Fjern tomme rækker og kolonner fra tabeller i Word
Oplev Kutools / Kutools Plus fanen i denne video fra Kutools for Word. Nyd 100+ funktioner og permanent gratis AI-værktøjer. Download nu!
Bedste kontorproduktivitetsværktøjer
Kutools for Word - Forøg din Word-oplevelse med Over 100 Bemærkelsesværdige funktioner!
🤖 Kutools AI-funktioner: Generer indhold / Omskriv tekst / Dokument Q&A / Få hurtige svar / Oversæt dokumenter / Polsk dokument (bevar format)...
📘 Dokumentbeherskelse: Opdelt sider / Flet dokumenter / Eksporter udvalg i forskellige formater (PDF/TXT/DOC/HTML...) / Batch Konverter til PDF...
✏ Indholdsredigering: Batch Find og Erstat på tværs af flere filer / Ændr størrelse på alle billeder / Transponer tabelrækker og kolonner / Konverter tabel til tekst...
🧹 Ubesværet rengøring: Fej væk Ekstra pladser / Afsnit bryder / Tekstbokse / Hyperlinks / For mere fjernelse af værktøjer, gå til Fjern gruppe...
➕ Kreative indlæg: Indsæt Tusind adskillere / Afkrydsningsfelter / Radio knapper / QR kode / Stregkode / Flere billeder / Oplev mere i indsatte gruppe...
???? Præcisionsvalg: Find ud af Specifikke sider / tabeller / Former / Overskriftsparagraffer / Forbedre navigation med mere Type funktioner...
⭐ Stjerneforbedringer: Naviger til enhver placering / Auto-indsæt gentagen tekst / Skift mellem dokumentvinduer / 11 Konvertering Værktøjer...
Bedste kontorproduktivitetsværktøjer
Kutools for Word - 100+ værktøjer til Word
- 🤖 Kutools AI-funktioner: Generer, Omskriv, Opsummer, oversætte Dokumenter / Få hurtige svar / Polsk dokument (bevar format)
- 📘 Dokumentbeherskelse: Opdelt sider / Flet dokumenter / Batch Konverter til PDF
- ✏ Indholdsredigering: Batch Find og erstat / Ændr størrelse på alle billeder
- 🧹 Ubesværet rengøring: Fjern ekstra pladser / Fjern sektionsbrud
- ➕ Kreative indlæg: Indsæt tusinde separatorer / Indsæt afkrydsningsfelter / Opret QR-koder