如何从Word中的表中删除空的行和列？
如何从Word中的表中删除所有空行和列？ 本教程将向您展示几种从Word文档中的表格中删除空行和列的方法。
手动删除表中的所有空行和列
Microsoft Office Word不提供删除空行和空列的便捷方法，您需要通过手动选择每个空行和空列然后逐个删除它们来删除它们。
步骤1：选择要删除的空行或空列。 看截图：
步骤3：在 表 工具，点击 布局 标签;
步骤4： 行和列 组，点击 删除行 或删除列.
使用VBA代码从表中删除所有空行和列
Word的宏功能提供了一种更为方便的方法，可从文档表中删除所有空行和列。 您可以按以下步骤删除所有空行和列。
步骤1：按 “ Alt-F11” 打开“ Microsoft Visual Basic应用程序”窗口；
步骤2：点击 模块 在 插页 选项卡，将以下VBA代码复制并粘贴到“模块”窗口中；
步骤3：然后点击 运行
按钮以应用VBA。
VBA代码从表中删除所有空行和列：
子DeleteEmptyTablerowsandcolumns（）
应用程序.ScreenUpdating = False
Dim Tbl如表，cel如单元格，i长，n长，fEmpty为布尔值
使用ActiveDocument
对于.Tables中的每个Tbl
N = Tbl.Columns.Count
对于i = n至1步骤-1
fEmpty =真
对于Tbl.Columns（i）.Cells中的每个cel
如果Len（cel.Range.Text）> 2然后
fEmpty =假
退出
结束如果
下一个
如果fEmpty = True，则Tbl.Columns（i）.Delete
接下来，我
下一个Tbl
结束
使用ActiveDocument
对于.Tables中的每个Tbl
N = Tbl.Rows.Count
对于i = n至1步骤-1
fEmpty =真
对于Tbl.Rows（i）.Cells中的每个cel
如果Len（cel.Range.Text）> 2然后
fEmpty =假
退出
结束如果
下一个
如果fEmpty = True，则Tbl.Rows（i）.Delete
接下来，我
下一个Tbl
结束
设置cel =否：设置Tbl =否
Application.ScreenUpdating =真
END SUB
一键删除表中所有空行和列
Kutools for Word 为您提供了从文档表格中删除所有空行和空列的最方便的方法。您只需点击一次，然后 Kutools for Word的 Delete Rows/Columns 实用程序将为您快速从所有或选择的表中删除所有空行和列。
| Kutools for Word, 与超过 方便的功能，使您的工作更加轻松。 | ||
安装后 Kutools for Word，请执行以下操作：（立即免费下载 Kutools for Word！）
1。 点击 Kutools 加 > Delete Rows/Columns 在 Table 窗格。
2.然后弹出一个对话框，在“查找范围”部分中选择要从中删除表的范围，然后检查 行 选项和 空白行 选项或检查 柱 选项和 空白行 您需要的选项。 如果要删除所有空白行和列，则需要两次应用此操作。
 |
 |
现在会弹出一个对话框，提醒您已处理了多少张表，请单击 OK 关闭，并且空白行和列已从表中删除。
演示：从Word中删除表中的空白行和列
最佳办公生产力工具
Kutools for Word - 通过 Over 提升您的文字体验 100 显着特点！
🤖 Kutools 人工智能助手：用人工智能改变你的写作 - 生成内容 / 重写文本 / 总结文件 / 查询资料 基于文档，全部在Word中
📘 文档掌握: 分页 / 合并文件 / 以各种格式导出选择（PDF/TXT/DOC/HTML...） / 批量转换为PDF / 将页面导出为图像 / 一次打印多个文件...
✏ 内容编辑: 批量查找和替换 跨多个文件 / 调整所有图片的大小 / 转置表行和列 / 将表格转换为文字...
🧹 轻松清洁: 移开 多余的空间 / 分节符 / 所有标题 / 文本框 / 超链接 / 如需更多拆卸工具，请前往我们的 删除组...
➕ 创意插入： 插 千位分隔符 / 复选框 / 单选按钮 / 扫码支付 / 条码 / 对角线表 / 公式标题 / 图片说明 / 表标题 / 多张图片 / 发现更多 插入组...
🔍 精准选择：精确定位 特定页面 / 表 / 形状 / 标题段落 / 增强导航功能 更多 选择功能...
⭐ 星级增强: 快速导航至任何位置 / 自动插入重复文本 / 在文档窗口之间无缝切换 / 11 转换工具...
