打印包含更改内容的动态Excel页面

时间:2015-04-09 07:25:44

标签: excel vba excel-vba

我有一个包含两个工作表的Excel工作簿 在第一个,我有一个“表单”,在第二个表格中的所有数据

我所做的是在第一张纸上更改 ID号,然后一个函数查看第二张表以找到ID号,然后更改单元格上的数据我已经指定给第二页的人。
它适用于付费公司员工,目前有 50个唯一ID

如果可能,有没有办法在一次点击中打印包含不同内容的第一张纸?有谁知道这样做的方法?

1 个答案:

答案 0 :(得分:0)

您可以使用类似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