打印具有不同列的excel工作表的不同页面

我有一个excel工作簿，它有多张工作表。每张表有两个部分KPI和摘要（一个在另一个下面）。我使用分页符来确保它们打印在不同的页面上。我必须打印列A1到L200；但是，KPI部分的B、E、H列应隐藏，汇总部分的其他几列应隐藏，即这两个部分中的可见列和隐藏列重叠

目标是创建一个pdf，其中多个页面仅用于可见列

这是代码。在这里，我隐藏和取消隐藏列。但我不知道如何在同一页下控制页面中的列

Sub Hide_Rows_Report_Template(HideRange As Range)
        For Each c In HideRange
                    If c.Value > 0 Then
                        c.EntireColumn.Hidden = True
                    End If
        Next c
End Sub

Sub UnHide_Rows_Report_Template(HideRange As Range)
        For Each c In HideRange
           c.EntireColumn.Hidden = False
        Next c
End Sub

Sub call_hide_Rows()

Application.ScreenUpdating = False

    Call UnHide_Rows_Report_Template(Range("Hide1"))


    Call Hide_Rows_Report_Template(Range("Hide_Range"))

Application.ScreenUpdating = True

End Sub

Sub call_Unhide_Rows()

Application.ScreenUpdating = False

    Call UnHide_Rows_Report_Template(Range("Hide1"))


Application.ScreenUpdating = True

End Sub

Sub print_page()

Call UnHide_Rows_Report_Template(Range("Hide1"))

Call Hide_Rows_Report_Template(Range("Hide1"))

ActiveSheet.PrintOut From:=1, To:=1

End Sub

---

嗨，大本。。我已经用代码更新了我的帖子。根据您使用的pdf打印驱动程序，您可以将连续打印附加到同一文件中。这样你就可以依次设置和打印每个区域。嗨，克里斯，我正在使用打印机列表中的adobe pdf选项来创建pdf。请分享关于如何将连续打印内容附加到同一pdf的任何文章。这个链接说Adobe无法做到这一点，但建议其他一些人也能做到。。我已经用代码更新了我的帖子。根据您使用的pdf打印驱动程序，您可以将连续打印附加到同一文件中。这样你就可以依次设置和打印每个区域。嗨，克里斯，我正在使用打印机列表中的adobe pdf选项来创建pdf。请分享关于如何将连续打印内容附加到同一pdf的任何文章。这个链接说Adobe不能做到这一点，但建议其他一些人也能做到