Hur tar jag bort tomma rader och kolumner från tabeller i Word?
Hur kan du ta bort alla tomma rader och kolumner från tabeller i Word? Denna handledning visar dig flera sätt att ta bort tomma rader och kolumner från tabeller i Word-dokument.
Ta bort alla tomma rader och kolumner manuellt från tabeller
Ta bort alla tomma rader och kolumner från tabeller med hjälp av VBA-kod
Ta bort alla tomma rader och kolumner från tabellerna med ett klick
Ta bort alla tomma rader och kolumner manuellt från tabeller
Microsoft Office Word ger inte ett bekvämt sätt att ta bort tomma rader och kolumner, och du måste ta bort dem genom att manuellt markera varje tom rad och kolumn och sedan ta bort dem en efter en.
Steg 1: Välj den tomma raden eller den tomma kolumnen du vill ta bort. Se skärmdump:
Steg 3: Under Bord Verktyg, klicka på Layout Flik;
Steg 4: I Rader och kolumner grupp, klicka Radera rader eller Radera kolumner.
Ta bort alla tomma rader och kolumner från tabeller med hjälp av VBA-kod
Makrofunktionen i Word ger ett mycket bekvämare sätt att ta bort alla tomma rader och kolumner från tabeller i dokumentet. Du kan ta bort alla tomma rader och kolumner enligt följande.
Steg 1: Tryck "Alt-F11" för att öppna Microsoft Visual Basic for Application-fönstret;
Steg 2: Klicka Modulerna på Insert flik, kopiera och klistra in följande VBA-kod i modulfönstret;
Steg 3: Klicka sedan på Körning knappen för att tillämpa VBA.
VBA-koden för att ta bort alla tomma rader och kolumner från tabeller:
Sub DeleteEmptyTablerowsandcolumn ()
Application.ScreenUpdating = False
Dim Tbl som tabell, cel som cell, jag så lång, n så lång, tom som boolesk
Med ActiveDocument
För varje tabell i .tabeller
n = Tbl.Columns.Count
För i = n Till 1 Steg -1
fEmpty = Sant
För varje cel I Tbl.Column (i) .Cells
Om Len (cel.Range.Text)> 2 Då
fEmpty = Falskt
Avsluta för
End If
Nästa cel
If fEmpty = True Then Tbl.Column (i). Radera
Nästa jag
Nästa Tbl
Sluta med
Med ActiveDocument
För varje tabell i .tabeller
n = Tbl.Rows.Count
För i = n Till 1 Steg -1
fEmpty = Sant
För varje cel i Tbl.Rows (i) .Cells
Om Len (cel.Range.Text)> 2 Då
fEmpty = Falskt
Avsluta för
End If
Nästa cel
If fEmpty = True Then Tbl.Rows (i). Radera
Nästa jag
Nästa Tbl
Sluta med
Ställ in cel = ingenting: Ställ in Tbl = ingenting
Application.ScreenUpdating = True
End Sub
Ta bort alla tomma rader och kolumner från tabellerna med ett klick
Kutools for Word ger dig det enklaste sättet att ta bort alla tomma rader och kolumner från tabeller i dokumentet. Du behöver bara klicka en gång och Kutools för Word's Delete Rows/Columns verktyget tar bort alla tomma rader och kolumner från alla eller väljade tabeller åt dig snabbt.
Kutools för Word, med mer än praktiska funktioner, underlättar dina jobb. | ||
När du har installerat Kutools för Word, gör så här:(Gratis nedladdning Kutools för Word nu!)
1. klick Kutools Plus > Delete Rows/Columns på Table rutan.
2. Sedan öppnas en dialogruta, välj det omfång som du vill ta bort tabeller från i avsnittet Sök i och kontrollera sedan Rad alternativ och Tom rad alternativ, eller markera Kolumn alternativ och Tom rad alternativ som du behöver. Om du vill ta bort alla tomma rader och kolumner måste du använda den här åtgärden två gånger.
Nu dyker en dialog upp för att påminna dig om hur många tabeller som har behandlats, klicka OK för att stänga, och de tomma raderna och kolumnerna har tagits bort från tabellerna.
Demo: Ta bort tomma rader och kolumner från tabeller i ord
Bästa kontorsproduktivitetsverktyg
Kutools för Word - Höj din ordupplevelse med Over 100 Anmärkningsvärda funktioner!
🤖 Kutools AI Assistant: Förvandla ditt skrivande med AI - Generera innehåll / Skriv om text / Sammanfatta dokument / Fråga för information baserat på dokument, allt i Word
📘 Dokumentbehärskning: Dela sidor / Sammanfoga dokument / Exportera urval i olika format (PDF/TXT/DOC/HTML...) / Batchkonvertera till PDF / Exportera sidor som bilder / Skriv ut flera filer samtidigt...
✏ Innehållsredigering: Batch Hitta och ersätt över flera filer / Ändra storlek på alla bilder / Transponera tabellrader och kolumner / Konvertera tabell till text...
🧹 Enkel rengöring: Svep bort Extra utrymmen / Avsnitt bryter / Alla rubriker / Textrutor / Hyperlänkar / För fler borttagningsverktyg, gå till vår Ta bort gruppen...
➕ Kreativa inlägg: Föra in Tusen avskiljare / Kryssrutor / radio Knappar / QR-kod / Streckkod / Diagonal linjebord / Bildtext för ekvation / Bild Bildtext / Tabelltextning / Flera bilder / Upptäck mer i Infoga grupp...
🔍 Precisionsval: Precisera specifika sidor / Tabellerna / former / rubrikerna / Förbättra navigering med mer Välj funktioner...
⭐ Stjärnförbättringar: Navigera snabbt till vilken plats som helst / infoga repetitiv text automatiskt / växla sömlöst mellan dokumentfönster / 11 Konverteringsverktyg...