excel 打印宏引用单元格的值

Sub 打印()

Worksheets("###").PrintOut From:=1, To:=1, copies:=1,Collate _

:=True

End Sub
就是想要在copies:=内引用sheet1内C6的值

Sub 打印()

Worksheets("###").PrintOut From:=1, To:=1, copies:=sheet1.[C6]
,Collate _

:=True

End Sub

假设你的 1000001在单元格k2里，且它是数字（不是文本）。在k2输入 1000000。 同时按alt和f11进入宏界面，在左上窗口找到本工作簿，双击里面的thisworkbook，在右边窗口粘贴如下代码： private sub workbook_beforeprint(cancel as boolean) range("k2") = range("k2") + 1 end sub 回到excel，你打印一次，k2增加1。