我需要创建一个包含两个部分的报告（用于打印）。顶部包含记分卡，底部包含记分卡中任何“红色”项目的钻取信息。
记分卡当前是具有条件格式的 PowerPivot 表。如果记分卡有 3 个“红色”单元格，那么我可以双击每个红色单元格来钻取详细信息。但是，我想在记分卡下方的同一个工作表中显示这 3 个钻取表，因此我可以同时打印记分卡和钻取详细信息。
我正在寻找一种自动化的解决方案。每次打印报告时，我都可以进行大量复制和粘贴，但我宁愿不这样做。我正在寻找一种尽可能自动化的解决方案 - 因此报告的底部将始终包含记分卡中任何红色内容的详细信息。我愿意使用 VBA。
谢谢！
我建议使用VBA。但是，首先将工作表列表存储在您的一张工作表中以供您的 VBA 代码使用。在您的工作簿代码部分中创建以下子例程，以便在选择新工作表时触发：
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
现在将代码添加到此子例程，以通过检查列表来验证所选工作表是否已存在于您的工作簿中。
如果它还没有在列表中，请检查工作表上是否有表格。
如果工作表上有一个表格，则将其内容复制/移动到您的报告工作表到特定范围，然后再次删除钻取工作表（并将其从列表中删除）。让代码再次选择您的报告表！如果工作表上没有表格，请将其添加到工作表列表