打印dynamic的Excel页面，更改内容

我有两个工作表的Excel工作簿。
在第一个我有一个“forms”和第二个表中的所有数据 。

我所做的是在第一张纸上更改ID号 ，然后一个函数查看第二张纸以findID号，然后将我指定的单元格上的数据更改为第二页上的数据。
这是用于支付公司员工，目前有50个唯一的ID 。

如果可能的话，是否可以通过一次点击打印不同内容的第一张纸？ 有没有人知道一个办法做到这一点？

Answer 1

您可以使用类似这样的方式For each myCell in worksheets(2).range("A1:A50")...next myCell循环遍历所有存储的具有不同ID的单元格，并将每个值放到工作表上的单元格1。
这就是我的意思

 Sub PrintAll_IDs() For Each myCell In Worksheets(2).Range("A1:A50") 'range with stored ID's Worksheets(1).Range("A1") = myCell.value ' "A1" is the cell with ID that you change manually now Worksheets(1).PrintOut ' I'm not sure how to print using VBA, just showing the workflow Next myCell End Sub