如何在Excel中将打印区域设置为最后一行？

如何在Excel中将打印区域设置为最后一行？

在Excel中，默认情况下，它将设置整个工作表，直到最后一行以数据作为打印区域。 但是在这种情况下，我想从A列打印到C列，直到最后一行显示数据，如下图所示，有什么方法可以处理？

通过打印选择将打印区域设置为最后一行数据

通过VBA将打印区域设置为最后一行的数据

通过打印选择将打印区域设置为最后一行数据

要将选择内容打印到数据的最后一行，可以在打印之前将打印区域更改为指定的选择。

1.按住 按Ctrl

键，然后选择要打印的列。 看截图：

2。 点击 文件 > 打印，然后选择 打印选择 来自 设置

部分。 看截图：

将打印区域设置为数据的最后一行

在这里，我也介绍了执行此操作的宏代码。

1.启用您使用的工作表，然后按 Alt + F11键 打开钥匙 Microsoft Visual Basic应用程序 窗口，然后单击 插页 > 模块

。 查看截图。

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。 点击 OK，已设置打印区域。