用于跨多个工作表创建多个不同范围的 PDF 的宏

Question

我正在尝试创建一个宏，在不同的工作表上创建不同指定范围的 PDF 文件。我正在使用的当前代码：

 Sub Macro1()

Sheets("Administratief").Activate
ActiveSheet.Range("A1:F22").Select
Sheets("Spuiwater TID").Activate
ActiveSheet.Range("B4:F17").Select

Sheets(Array("Administratief", "Spuiwater TID")).Select

Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
    FormName, Quality:=xlQualityStandard, _
    IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
    True
    
End Sub

这样做的问题是，它在两张纸中都使用“A1:F22”的范围，而不是使用 B4:B17 的范围。有办法解决这个问题吗？

Answer 1

我对 VBA 还不太熟悉（最近才开始了解基础知识）。但也许您可以尝试将两个范围复制到新工作表中，然后计算出您要对数据执行的操作（将它们放入数组中并输出到 PDF 中），然后删除新创建的工作表。

我“学习”VBA 的方法基本上是记录我正在做的任何事情的宏，然后以我认为应该有效的方式将它们组合在一起。

希望有帮助！还可能想将“VBA”标签添加到您的问题中。