刪除Word文檔中表格單元格中多餘空間的3種有效方法

在下面的文章中，我們想為您提供3種有效的方法來刪除Word文檔中表格單元格中的多餘空格。

有時，我們需要插入一個表來保存文本和數據。 但是，我們通常必須在輸入文本和數據後調整表格大小。 有時，調整大小後，我們會得到一個表格，其中的單元格中有多餘的空格，如下所示：

在上面的示例中，每個單元格中的文本下方都有一個空白行。 但是我們無法僅通過按“刪除”來擺脫它。 相反，我們必須使用其他解決方法。

方法1：手動縮小行高

1. 第一和前ost，檢查單元格中是否有可移動的空白行。 如果有，請先刪除它們。
2. 然後將光標放在表格行的底行上。 等到光標變為帶有2個箭頭的雙水平線的符號。
3. 下一步單擊並向上拖動底線，直到不需要的空間消失。
4. 在表中需要調整其高度的其他行上重複步驟2和3。

結果如下：

方法2：禁用“指定高度”功能

1. 首先，單擊左上角的十字符號以選擇整個表格。
2. 然後右鍵單擊並選擇“表屬性”。
3. 在“表格屬性”框中。 首先單擊“行”選項卡。
4. 接下來清除“指定高度”框。
5. 最後，單擊“確定”。

效果與方法1相同。

方法3：使用Word宏

1. 到tar關閉，單擊“開發人員”，然後單擊“ Visual Basic”以打開VBA編輯器。 如果功能區中沒有“顯影器”選項卡，請改為按“ Alt + F11”。
2. 接下來，創建一個新模塊。 點擊左側欄中的“普通”。
3. 然後在菜單欄上單擊“插入”。
4. 在下拉菜單上選擇“模塊”。
5. 接下來，雙擊模塊以將其打開。
6. 現在，將以下代碼粘貼到編碼區域：

Sub RemoveSpacesInTables()
  Dim objTable As Table
  Dim objDoc As Document
 
  Set objDoc = ActiveDocument
 
  With objDoc
    If .Tables.Count > 0 Then
      For Each objTable In .Tables
        objTable.Select
        Selection.Rows.HeightRule = wdRowHeightAuto
        Selection.Rows.Height = InchesToPoints(0)
      Next objTable
    Else
      MsgBox ("This document contains no table.")
    End If
  End With
End Sub

7. 最後，單擊“運行”或按“ F5”執行代碼。

該宏應在文檔中的所有表上工作並刪除不必要的空間。

三種方法的比較

文件一旦損壞

不是 rare偶爾獲取損壞的文檔。 但是，在文檔損壞的那一刻，這也是恐懼開始的時候。因此，為了安全起見，最快的措施是找到維修工具來修復損壞的物品。 修復docx 以防止其進一步損壞。

作者簡介：

陳薇薇（Vera Chen）是 DataNumen，Inc.是數據恢復技術的全球領導者，包括 修復Excel 以及 pdf 維修軟件產品。 欲了解更多信息，請訪問 萬維網。datanumen.COM