如何从 Word 中的表格删除空行和列？

Author: Amanda Li Last Modified: 2025-07-31

表格中的空行和列可能会使您的 Word 文档显得杂乱无章。本教程将向您展示几种有效的方法，以从 Word 文档中的表格删除所有空行和列。

无论您是喜欢手动操作、使用 VBA 代码，还是采用一键式解决方案，这些方法都将帮助您清理表格并提升文档的整体外观。

手动删除表格中的所有空行和列

一键删除表格中的所有空行和列

使用 VBA 代码删除表格中的所有空行和列

手动删除表格中的所有空行和列

Microsoft Word 没有快速删除空行和列的选项，因此您必须手动选择并逐个删除它们。

选择要删除的空行或列。
在 表格工具下，点击布局选项卡。
在 行与列 组中，点击 删除行 或 删除列.

一键删除表格中的所有空行和列

Kutools for Word 提供了一种高效的解决方案，可从文档中的表格删除所有空行和列。只需单击一下，Kutools for Word 的 Delete Rows/Columns 工具即可快速从文档中的所有或选定表格中删除所有空行或列，节省时间和精力。

Kutools for Word，内置 AI 🤖，提供超过 100 种实用功能，助您简化任务。

立即下载

安装 Kutools for Word 后，请按照以下步骤操作：

点击 Kutools Plus > 表格 > 删除空行/列.
将弹出 删除表格中的空白或重复行/列 对话框。在 查找范围 部分，选择要删除空白行或列的范围，可以是 选中的表格 或 活动文档中的所有表格。然后：
- 勾选“行”选项和“空行”选项以删除空行。
- 或者，勾选“列”选项和“空列”选项以删除空列。
提示：如果要同时删除空白行和列，请重复操作两次。
将弹出一个确认对话框，显示已处理的表格数量。点击确定关闭它。现在，表格中的空白行和列已被删除。

Kutools for Word 是终极的 Word 插件，能够简化您的工作并提升文档处理技能。立即获取！

使用 VBA 代码删除表格中的所有空行和列

Word 中的宏功能提供了一种更便捷的方法来删除文档中表格的所有空行和列。请按照以下步骤高效地删除它们：

按 Alt + F11 打开 Microsoft Visual Basic for Applications 窗口。

点击模块在插入选项卡下，并将以下 VBA 代码复制粘贴到模块窗口中。

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