将activesheet声明为数组以打印2张工作簿

Question

我正在尝试同时打印活动工作表和另一个包含常规信息（在同一工作簿中）的工作表。 （Recto verso，我的打印机自动执行，不需要代码）

在我的工作簿中，我有多张使用相同代码进行打印的工作表。现在我想将带有名为“Huurvoorwaarden”的一般信息的表单添加到一个数组中，以便自动打印并在活动工作表的背面。

我尝试了多种解决方法，例如dim / set activesheet.name，以及我在网上找到的代码。什么都行不通 我知道当我将“activesheet”更改为Sheet1时，这将起作用，但仅适用于第1页。

你能帮我吗？

这是我得到的:(我所有的旧尝试都被删除了）

    'Print Active Sheet and sheet Huurvoorwaarden
    Worksheets(Array("activesheet.name", "Huurvoorwaarden")).PrintOut

Answer 1

活动工作表的名称不是字符串文字"ActiveSheet.Name"，而是属性ActiveSheet.Name。

所以你需要使用

Worksheets(Array(Activesheet.Name, "Huurvoorwaarden")).PrintOut