本教程向您展示瞭如何手動和使用宏輕鬆地管理Excel中的打印區(qū)域。打印整個電子表格可能很麻煩； Excel的打印區(qū)域功能使您可以準(zhǔn)確指定什麼打印。

• 設(shè)置打印區(qū)域
• 定義多個打印區(qū)域
• 忽略打印??區(qū)域
• 在一頁上打印多個區(qū)域
• 在多張紙上設(shè)置打印區(qū)域（使用VBA）
• 修改打印區(qū)域
• 清理打印區(qū)域
• 保護打印區(qū)域（使用VBA）
• 故障排除打印區(qū)問題

Excel打印區(qū)域解釋了

打印區(qū)域定義打印輸出中包含的單元格範(fàn)圍。如果您不需要整個電子表格，請定義僅包含必要數(shù)據(jù)的打印區(qū)域。選擇打印區(qū)域只能在使用CTRL P或打印按鈕時僅確保該區(qū)域打印。單個頁面上的單個紙上的多個打印區(qū)域在單獨的頁面上。打印區(qū)域由工作簿保存。

設(shè)置打印區(qū)域

有兩種設(shè)置打印區(qū)域的方法：

快速方法：

1. 選擇要打印的數(shù)據(jù)。
2. 轉(zhuǎn)到“頁面佈局”選項卡，頁面設(shè)置組，然後單擊“打印區(qū)域” >設(shè)置打印區(qū)域。

微弱的灰色邊框表示打印區(qū)域。

詳細方法：

1. 在頁面佈局選項卡上，單擊“頁面設(shè)置對話框啟動器” 。
2. 在“表”選項卡中，輸入或在“打印區(qū)域”字段中選擇所需的範(fàn)圍（保留多個範(fàn)圍的CTRL）。
3. 單擊確定。

提示：打印區(qū)域由工作簿保存。在打印之前始終預(yù)覽（CTRL P）以驗證選擇。要在不設(shè)置打印區(qū)域的情況下打印選擇，請選擇範(fàn)圍，按CTRL P，然後選擇“打印”選擇。

多個打印區(qū)域

打印工作表的幾個部分：

1. 選擇第一個範(fàn)圍，保持CTRL，然後選擇其他範(fàn)圍。
2. 在“頁面佈局”選項卡上，單擊“打印區(qū)域” >設(shè)置打印區(qū)域。

每個區(qū)域都在單獨的頁面上打印。這僅適用於非連續(xù)範(fàn)圍。

忽略打印??區(qū)域

要打印整個工作表或工作簿，請忽略定義的打印區(qū)域：

1. 單擊文件>打印或按CTRLP。
2. 在設(shè)置下，從“打印主動紙”下拉列表中選擇“忽略打印區(qū)域” 。

在一頁上打印多個區(qū)域

這取決於打印機的功能。檢查您的打印機屬性，以獲取每個表選項的頁面。如果不可用，請使用粘貼特殊>鏈接的圖片將打印範(fàn)圍複製到新表格以維護指向原始數(shù)據(jù)的鏈接，然後打印新的表。

在多張紙上設(shè)置打印區(qū)域（VBA）

對於許多結(jié)構(gòu)化工作表的一致打印區(qū)域，VBA宏是有效的。

宏1：匹配活動表的打印區(qū)域：此宏設(shè)置所選紙的打印區(qū)域以匹配活動紙。

 setPrintAreaselectedSheets（）
  DIM CurrentPrintarea作為字符串
  DIM表作為工作表
  CurrentPrintArea = ActiveSheet.pagesetup.printarea
  對於ActiveWindow.SelectedSheets中的每個表格
    sheet.pagesetup.printarea = CurrentPrintArea
  下一個
結(jié)束子

宏觀2：將打印區(qū)域應(yīng)用於所有表：此宏將活動紙的打印區(qū)域應(yīng)用於工作簿中的所有床單。

子setPrintAreAllSheets（）
  DIM CurrentPrintarea作為字符串
  DIM表作為工作表
  CurrentPrintArea = ActiveSheet.pagesetup.printarea
  對於ActiveWorkbook中的每個表格。
    如果sheet.name  activesheet.name，則
      sheet.pagesetup.printarea = CurrentPrintArea
    如果結(jié)束
  下一個
結(jié)束子

宏3：用戶定義的打印區(qū)域：此宏提示用戶選擇一個打印區(qū)域，然後將其應(yīng)用於所有選定的床單。

 setPrintareamultiplesheets（）
  DIM選擇的PrintareArge作為範(fàn)圍
  DIM選擇的PrintareArangeadDress作為字符串
  DIM表作為工作表
  下一個錯誤簡歷
  設(shè)置Secte sectionPrintArange = application.inputbox（“請選擇“打印區(qū)域範(fàn)圍”，“在多張紙中設(shè)置打印區(qū)域”，類型：= 8）
  如果不是選擇的printarearange，那麼
    selected printarearangeaddress = selected printarearange.address（true，true，xla1，false）
    對於ActiveWindow.SelectedSheets中的每個表格
      Sheet.pagesetup.printarea = Selected PrintareArangeadDress
    下一個
  如果結(jié)束
  設(shè)置Selected PrintArange = Nothing
結(jié)束子

使用這些宏下載示例工作簿，以便於使用。

修改打印區(qū)域

擴展打印區(qū)域：

1. 選擇要添加的單元格。
2. 在“頁面佈局”選項卡上，單擊“打印區(qū)域” >添加到打印區(qū)域。

另外，請使用名稱管理器（公式選項卡>定義的名稱>名稱管理器）直接編輯Print_Area範(fàn)圍，或修改頁面設(shè)置對話框中的範(fàn)圍。

清理打印區(qū)域

在“頁面佈局”選項卡上，單擊“打印區(qū)域” >清除打印區(qū)域。

保護印刷區(qū)（VBA）

沒有直接鎖定打印區(qū)域的方法。在打印之前，請使用VBA的Workbook_BeforePrint事件來執(zhí)行特定的打印區(qū)域：

私人子工作簿
  ActiveSheet.pagesetup.printarea =“ A1：D10”'或指定所需範(fàn)圍
結(jié)束子

（根據(jù)需要適應(yīng)具有不同範(fàn)圍的多個床單。）將此代碼放在您的宏觀啟用工作簿（.xlsm）的ThisWorkbook模塊中。

故障排除

• 無法設(shè)置打印區(qū)域：清除打印區(qū)域並重新定義它。
• 並非所有列打?。?/strong>列寬度可能超過紙張尺寸。調(diào)整保證金或縮放（在一頁上適合所有列）。
• 在多個頁面上打印區(qū)域打?。?/strong>非粘合範(fàn)圍分別打印。如果單個範(fàn)圍涵蓋多個頁面，請減小其大小或調(diào)整頁面設(shè)置（一頁上的適合表）。