透视循环筛选并打印到新excel
我正在尝试运行透视表上的不同筛选选项，并将每个结果打印到新的excel文档中。 下面是我所做的，因为当我将它导出为PDF时，它工作得非常好。 我希望新的excel只包含带有透视表的工作簿，表周围的格式和过滤器被卡住，这样您就看不到其他选项 这可能吗 谢谢你的帮助 更多信息： 此透视表通过未付发票生成客户对账单，它需要通过的过滤器是客户名称。 最初我会运行不同的pivot选项并以PDF格式打印。当我使用PDF格式时，公司徽标出现在工作表的标题中，但它会显示在PDF版本中。同样，当它将成为PDF时，我能够设置工作表的打印区域，以便从PDF中剪切出透视切片器。 这是我用来做这个的透视循环筛选并打印到新excel,excel,vba,pivot-table,Excel,Vba,Pivot Table,我正在尝试运行透视表上的不同筛选选项，并将每个结果打印到新的excel文档中。 下面是我所做的，因为当我将它导出为PDF时，它工作得非常好。 我希望新的excel只包含带有透视表的工作簿，表周围的格式和过滤器被卡住，这样您就看不到其他选项 这可能吗 谢谢你的帮助 更多信息： 此透视表通过未付发票生成客户对账单，它需要通过的过滤器是客户名称。 最初我会运行不同的pivot选项并以PDF格式打印。当我使用PDF格式时，公司徽标出现在工作表的标题中，但它会显示在PDF版本中。同样，当它将成为PDF时，
With pf
.ClearAllFilters
For Each pi In .PivotItems
.CurrentPage = pi.Name
wksSource.ExportAsFixedFormat Type:=xlTypePDF, Filename:=strPath & pi.Name & ".pdf"
Next pi
.ClearAllFilters
End With
End Sub
由于我现在需要以excel格式生成它们，我现在不知道如何更改代码来实现这一点。我已将公司徽标移动到工作表中，因此它将以excel版本显示。此外，我在工作表上仍然有我不想在语句中显示的透视切片器 请详细说明您期望输出的内容以及您实际拥有的内容。我认为一个直观的例子会很有帮助。代码示例应该是最小的，并且只包含与您希望实现的目标相关的部分，并且到目前为止您已经完成了此任务。我已更改了原始问题，请告诉我更多信息是否有帮助。如果我理解正确，您只想将工作簿保存到另一个excel文件中，那么，您可能正在寻找
工作簿.SaveAs工作簿的PDF和XPS。ExportAsFixedFormat