[已解决]请教老师关于打印的问题，在线等。。。

过江龙

请问老师们，当我点击Excel上的打印按钮时，除了能打印外，还要运行一些代码来进行相关操作，如统计等，该用什么事件呢？谢谢！

最佳答案

月排行榜 / 总排行榜

amulee

2010-3-26 15:35

Private Sub Workbook_BeforePrint(Cancel As Boolean)

End Sub

跳转到最佳答案楼层

amulee

Private Sub Workbook_BeforePrint(Cancel As Boolean)

End Sub

过江龙

老师，怎么不行呢？

Private Sub Workbook_BeforePrint(Cancel As Boolean)
With Sheet2
  i = .[A65536].End(xlUp).Row + 1
       .Cells(i, 1) = Cells(4, 4)
       .Cells(i, 2) = Cells(8, 5)
  End With

End Sub
我的表2里没有进行数据填充。为什么呢？错在哪里？

[此贴子已经被作者于2010-3-26 15:55:46编辑过]

amulee

代码要放在ThisWorkbook里面，经过测试有效

过江龙

谢谢，放错了。试试看。