Hi,

I share a workbook with several sheets and macros with my officemates. I
have this macro so they cannot print any of the worksheets.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = True
End Sub

However, when I out of town, and the reports needs to be printed, I'd like
to e-mail them another workbook to edit the macro above and replace it with
the macro below.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If Date < VBA.DateSerial(2007, 8, 17) Then
Cancel = True
End If
End Sub

The original workbook VBA Project Password is "OPENPW". Both workbooks will
have the same VBA Project Password.

Thank you.