Ga naar hoofdinhoud

Hoe verwijder ik lege rijen en kolommen uit tabellen in Word?

Hoe verwijder je alle lege rijen en kolommen uit tabellen in Word? Deze tutorial laat je verschillende manieren zien om lege rijen en kolommen uit tabellen in Word-document te verwijderen.

Verwijder handmatig alle lege rijen en kolommen uit tabellen

Verwijder alle lege rijen en kolommen uit tabellen met behulp van VBA-code

Verwijder alle lege rijen en kolommen uit tabellen met één klikgoed idee 3


Verwijder handmatig alle lege rijen en kolommen uit tabellen

Microsoft Office Word biedt geen gemakkelijke manier om lege rijen en kolommen te verwijderen, en u moet ze verwijderen door handmatig elke lege rij en kolom te selecteren en ze vervolgens een voor een te verwijderen.

Stap 1: Selecteer de lege rij of lege kolom die u wilt verwijderen. Zie screenshot:

doc-removersandcols-1

Stap 3: Under tafel Tools, klik op het Layout Tabblad;

doc-removersandcols-2

Stap 4: In het Rijen en kolommen groep, klik Rijen verwijderen of Kolommen verwijderen.

doc-removersandcols-3


Verwijder alle lege rijen en kolommen uit tabellen met behulp van VBA-code

De macrofunctie van Word biedt een veel gemakkelijkere manier om alle lege rijen en kolommen uit tabellen in een document te verwijderen. U kunt als volgt alle lege rijen en kolommen verwijderen.

Stap 1: druk op "Alt-F11" om het Microsoft Visual Basic for Application-venster te openen;

Stap 2: klik op Module op de Invoegen tab, kopieer en plak de volgende VBA-code in het modulevenster;

Stap 3: Klik vervolgens op lopendoc-reverse-teken-6 knop om de VBA toe te passen.

De VBA-code om alle lege rijen en kolommen uit tabellen te verwijderen:

Sub DeleteEmptyTablerowsandcolumns ()
Application.ScreenUpdating = False
Dim Tbl als tabel, cel als cel, i zo lang, n zo lang, fEmpty als Boolean
Met ActiveDocument
Voor elke Tbl In .Tables
n = Tbl.Kolommen.Aantal
Voor i = n tot 1 stap -1
fEmpty = Waar
Voor elke cel in Tbl.Columns (i) .Cells
Als Len (cel.Range.Text)> 2 Then
fLeeg = Onwaar
Afsluiten voor
End If
Volgende cel
Als fEmpty = True Then Tbl.Columns (i) .Delete
Volgende i
Volgende Tbl
Eindigt met
Met ActiveDocument
Voor elke Tbl In .Tables
n = Tbl.Rijen.Aantal
Voor i = n tot 1 stap -1
fEmpty = Waar
Voor elke cel in Tbl.Rows (i) .Cells
Als Len (cel.Range.Text)> 2 Then
fLeeg = Onwaar
Afsluiten voor
End If
Volgende cel
Als fEmpty = True Then Tbl.Rows (i) .Delete
Volgende i
Volgende Tbl
Eindigt met
Set cel = Nothing: Stel Tbl = Nothing in
Application.ScreenUpdating = True
End Sub


Verwijder alle lege rijen en kolommen uit tabellen met één klik

Kutools voor Word biedt u de handigste manier om alle lege rijen en kolommen uit tabellen in een document te verwijderen. U hoeft maar één keer te klikken, en Kutools for Word's Delete Rows/Columns hulpprogramma zal alle lege rijen en kolommen snel voor u verwijderen uit alle of geselecteerde tabellen.

Kutools for Word, met meer dan  handige functies, maakt uw werk gemakkelijker. 

Na het installeren van Kutools voor Word, doe het als volgt:(Gratis download Kutools voor Word nu!)

1. klikken Koetools Plus > Delete Rows/Columns op de Table brood.

doc verwijder lege rijen kolommen uit tabel 1

2. Vervolgens verschijnt er een dialoogvenster, kies het bereik waaruit u tabellen wilt verwijderen in het gedeelte Zoeken in en vink het vervolgens aan Rij optie en Lege rij optie, of vink aan Kolom optie en Lege rij optie zoals je nodig hebt. Als u alle lege rijen en kolommen wilt verwijderen, moet u deze bewerking twee keer toepassen.

doc kutools verwijder lege rijen 2  doc kutools verwijder lege rijen 3 

Nu verschijnt er een dialoogvenster om u eraan te herinneren hoeveel tabellen zijn afgehandeld, klik op OK om te sluiten, en de lege rijen en kolommen zijn verwijderd uit tabellen.
doc kutools verwijder lege rijen 4

Tip.Als u lege rijen uit het Excel-blad wilt verwijderen, kan de Verwijder lege rijen nut van Kutools for Excel kan u helpen.

Beste Office-productiviteitstools

Kutools for Word - Verbeter uw woordervaring met Over 100 Opmerkelijke kenmerken!

🤖 Kutools AI-assistent: Transformeer uw schrijven met AI - Inhoud genereren  /  Herschrijf tekst  /  Documenten samenvatten  /  Informeer voor informatie gebaseerd op document, allemaal binnen Word

📘 Documentbeheersing: Pagina's splitsen  /  Voeg documenten samen  /  Selectie exporteren in verschillende formaten (PDF/TXT/DOC/HTML...)  /  Batchconversie naar PDF  /  Pagina's exporteren als afbeeldingen  /  Meerdere bestanden tegelijk afdrukken...

Inhoud bewerken: Batch zoeken en vervangen over meerdere bestanden  /  Formaat van alle afbeeldingen wijzigen  /  Tabelrijen en -kolommen transponeren  /  Converteer tabel naar tekst...

🧹 Moeiteloos schoon: Veeg weg Extra ruimtes  /  Sectie-onderbrekingen  /  Alle koppen  /  Tekstvakken  /  hyperlinks  / Ga voor meer verwijdergereedschappen naar onze Groep verwijderen...

Creatieve invoegingen: Invoegen Duizend scheidingstekens  /  Vink vakjes aan  /  Radio knoppen  /  QR Code  /  Barcode  /  Diagonale lijntabel  /  Vergelijking bijschrift  /  Bijschrift bij afbeelding  /  Tabel titel  /  Meerdere afbeeldingen  / Ontdek meer in de Groep invoegen...

???? Precisieselecties: Vaststellen specifieke pagina's  /  tafels  /  vormen  /  kop paragrafen  / Verbeter de navigatie met meer Selecteer functies...

Sterverbeteringen: Navigeer snel naar elke locatie  /  automatisch herhaalde tekst invoegen  /  naadloos schakelen tussen documentvensters  /  11 Conversiehulpmiddelen...

👉 Wil je deze functies proberen? Kutools voor Word biedt een Gratis proefperiode van 60-dag, zonder beperkingen! 🚀
 
Comments (16)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi
Many many thanks. Its 100% worked.
This comment was minimized by the moderator on the site
Hi, thanks for the CODE, it worked on a document with only one table.

but when launching it on a word document with different tables from different sizes, i got this error : "Run-time error '5992' Cannot access individual columns in this collection because the table has mixed cell widths"

Can anybody help, please
This comment was minimized by the moderator on the site
Bonjour,

Quand j'exécute le programme, l'erreur suivante s'affiche " Erreur de compilation : Instruction incorrecte à l'extérieur d'une procédure"

Quelqu'un a une solution s'il vous plait ?
This comment was minimized by the moderator on the site
I found this macro and it works great when it comes to a table with single empty rows.
Is it possible to change it to work on a table with split rows as well?
I would very much thank you if you have a solution for me.
This comment was minimized by the moderator on the site
Hi, shimon, I don't not understand your question, please give me examples or describe the question with more details.
This comment was minimized by the moderator on the site
You just saved me a zillion hours of frustration, THANK YOU!
This comment was minimized by the moderator on the site
u know you can just resize the table right? just filter and sort your data to top check how many rows have data, click table tools and the click resize and adjust the last number to whatever you need OR go to the bottom of the table the very last cell and use the tine blue triangle to drag and resize,
This comment was minimized by the moderator on the site
Except I have multiple page document with a table with varying information in each. Furthermore, it is a merge document so different each week. I need an automated method :)
This comment was minimized by the moderator on the site
Hi, the macro is working, BUT:

After deleting all rows, all the columns of the tables with empty rows open up very wide.

How can i fix the code so that this does not happens?


I am using Office 2016.


Thank you!
This comment was minimized by the moderator on the site
Hi All, I am looking for function in word wherein, if I remove specific word then it should remove that row as well.
This comment was minimized by the moderator on the site
Thanks for the code, really useful.
This comment was minimized by the moderator on the site
Is there a macro that will delete a row if only one of the cells in that row is empty or contains a zero?
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations