VBA更改数据透视筛选器并导出pdf文件

问题描述：

我试图自动化很多当前的Excel工作。 Atm我在我的透视表中有大约30个过滤器，我需要在当时更改一个然后导出为pdf文件。我认为可以创建一些自动更改过滤器并输出pdf（到本地文件夹）的VBA代码，然后自动继续并更改下一个过滤器，并从中创建一个PDF，等等，这些都是30次。VBA更改数据透视筛选器并导出pdf文件

我试图找到它的一些指导，但它不能为我。你对我如何开始有任何想法吗？

您是否尝试过录制覆盖几次迭代的宏？ –

答

也许分开看两个主题然后合并。

1：更改过滤器，你可以通过录制一个宏然后编辑结果，如果你不能理解像this。

2：保存为PDF有点棘手，因为你可以使用很多事情来做到这一点，取决于你的机器上是否有Adobe，或者如果你正在使用诸如pdfcreator等东西，this是一个例子，正在做类似的事情。

给它一个去把你的代码发回来，人们会更乐意尝试和帮助你。

我必须对此评论，因为我没有足够的信誉来评论你的答案，但是根据你在那里的内容，你可以在'Filename：='后改变字符串为动态的，即“C： \用户\用户名\文件夹\文件夹\文件\文件夹\文件夹\文件名“和我＆”.pdf“并增加我为每个文件。 –

答

好了，所以我发现我可以录制宏：

更换过滤器
另存为PDF

这完美的作品，但我需要保存的文件名是因为动态我需要30个PDF文件，而不是1.

所记录的代码如下所示

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ 
    "C:\Users\username\Folder\Folder\Documents\Folder\Folder\Filename.pdf" _ 
    , Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _ 
    :=False, OpenAfterPublish:=False

你知道我是如何改变基于单元名称保存的文件名吗？

VBA更改数据透视筛选器并导出pdf文件

相关推荐