如何在 Excel 中將打印區域設置為特定列直到最後一行？

在 Excel 中，默認情況下，打印區域設置為包含有數據的整個工作表直到最後一行。然而，如果您只想打印 A 到 C 列直到有數據的最後一行（並排除 C 列之後的所有數據），如下圖所示，是否有辦法處理這個問題呢？

通過「打印選擇」將打印區域設置到有數據的最後一行

使用 VBA 將打印區域設置到有數據的最後一行

數據延伸至 I 列的工作表	打印預覽僅顯示到 C 列的數據

通過「打印選擇」將打印區域設置到有數據的最後一行

要打印到有數據的最後一行的選擇範圍，您可以在打印前將打印區域更改為指定的選擇範圍。

1. 按住 Ctrl 鍵然後選擇您想打印的列。請參見截圖：

2. 點擊 文件 > 打印，然後從設置部分中選擇 打印選擇。請參見截圖：

將打印區域設置到有數據的最後一行

這裡我介紹一個宏代碼來進行此操作。

1. 啟用您使用的表格，按下 Alt + F11 鍵打開 Microsoft Visual Basic for Applications 窗口，並點擊 插入 > 模塊。請參見截圖。

2. 將以下代碼粘貼到模塊腳本中，並按 F5 鍵運行。

VBA：將區域設置到最後一行

'UpdatebyExtendoffice20170811
    Dim xRg As Range
    Dim xRgLRow As Long
    Dim xRgAddress As String
    On Error Resume Next
    xRgAddress = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Select a range：", "KuTools For Excel", xRgAddress, , , , , 8)
    xRg.Select
    xRgLRow = xRg.SpecialCells(xlCellTypeLastCell).Row
    xRgAddress = Left(xRg.Address(1, 1), Len(xRg.Address(1, 1)) - 2)
    xRgAddress = xRgAddress & xRgLRow
    ActiveSheet.PageSetup.PrintArea = xRgAddress
End Sub

3. 彈出對話框提醒您選擇要使用的列範圍。請參見截圖：

4. 點擊 確定，打印區域已設置完成。