自動將表格適合Word文檔中目錄或頁面的2種快速方法

本文旨在為您提供2種快速且可管理的方法，以使表格自動適合Word文檔中的內容或頁面。

現在在Word使用中不可避免地要插入表以保存數據。 通常，我們不僅會停下來擁有一張桌子，而且還會嘗試使其在文檔中看起來更漂亮。 這意味著我們將需要相應地適當調整表的大小。

現在，讓我們先來看一下必須更改表大小的場合：

1. 通常情況下，以橫向插入新頁面。 然後，您最初的理想表在新頁面設置中可能會太小。
2. 表格單元格的大小將根據字數進行更改。 這絕對會破壞文件的外觀。

請參閱以下示例：

接下來，讓我們開始今天的業務，在這裡向您介紹這兩種解決方案。

方法1：手動更改

1. 首先，點擊選取整張表格。
2. 然後，單擊“表格工具”下的“佈局”選項卡。
3. 接下來，轉到“單元格大小”組，單擊“自動調整”。
4. 然後在下拉菜單上選擇所需的內容，例如“自動調整內容”或“自動調整窗口”。 前者是指根據內容大小來改變表的大小，而後者是指由於頁面設置而導致的表大小的改變。

這是您可能會得到的：

如您所見，當只需要管理幾個表時，此方法最有效。 但是，當涉及大量表時，讓我們採取一種更智能，更快捷的方法。

方法2：使用VBA代碼批量執行

1. 首先，請確保功能區中有“開發人員”選項卡，然後單擊它。 如果不是，請單擊此處並跳至本文： 如何將背景音樂插入Word文檔
2. 然後，在“代碼”組中單擊“ Visual Basic”以打開VBA編輯器。
3. 在左側的“項目”窗格中，找到其後帶有文檔名稱的項目。 然後點擊“ ThisDocument”。
4. 接下來，單擊工具欄上的“插入”。
5. 然後在列表中選擇“模塊”。
6. 現在，編輯區域應在右側擴展。 如果要根據內容自動調整表格，則應在其中粘貼以下代碼：

Private Sub AutoFitContentsForAllTables()
  If ActiveDocument.Tables.Count > 0 Then
    Dim objTable As Object

    Application.Browser.Target = wdBrowseTable
    For Each objTable In ActiveDocument.Tables
      objTable.AutoFitBehavior (wdAutoFitContent)
    Next
  End If
End Sub

7. 或者，如果您需要根據窗口寬度自動調整表格，則下面的代碼會有所幫助：

Private Sub AutoFitWindowForAllTables()
  If ActiveDocument.Tables.Count > 0 Then
    Dim objTable As Object

    Application.Browser.Target = wdBrowseTable
    For Each objTable In ActiveDocument.Tables
      objTable.AutoFitBehavior (wdAutoFitWindow)
    Next
  End If
End Sub

8. 在此完成後，只需單擊“運行”。

照顧好您的信息

一般來說，你的電子設備上可能儲存著成千上萬條不可取代的資訊。說實話，要妥善管理每一個訊息確實很麻煩。一種成本不高的方法就是備份。備份有助於確保這些文件的安全。然而，備份並不能保證萬無一失。例如，我們幾乎每天都使用的 Word 文件可能會突然停止工作。這時，你就需要一款工具來恢復資料了。 恢復損壞的單詞.

作者簡介：

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