打印内容不断更改的动态Excel页面

Question

我有一个Excel工作簿，里面有两个工作表
在第一个表中，我有一个"表单"，在第二个表中的所有数据。

我所做的是，在第一张工作表上更改ID号，然后函数查看第二张工作表以查找ID号，然后将我指定的单元格上的数据更改为第二页上的数据
它是为付费公司员工提供的，目前有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