在打印任一打开的工作簿之前产生此事件。
Private Sub object_WorkbookBeforePrint(ByVal Wb As Workbook, ByVal Cancel As Boolean)
object 在类模块中带有事件声明的 Application 类型对象。有关详细信息,请参阅 Application 对象事件的用法。
Wb 工作簿。
Cancel 当事件产生时为 False。如果该事件过程将本参数设为 True,则当该过程运行结束之后不打印工作簿。
本示例在打印工作簿之前对所有工作表进行重新计算。
Private Sub App_WorkbookBeforePrint(ByVal Wb As Workbook, _
Cancel As Boolean)
For Each wk in Wb.Worksheets
wk.Calculate
Next
End Sub