用VBA禁止打印工作簿

如果需要在某个工作簿中禁止打印工作表，可以用下面的方法来实现：
    在VBA编辑器“工程”窗口中，双击“ThisWorkBook”，在右边的代码窗口中输入下面的代码：
    Private Sub Workbook_BeforePrint(Cancel As Boolean)
      Cancel = True
    End Sub
    该代码使用了Workbook.BeforePrint事件，在打印工作簿之前执行代码。这样，当我们在该工作簿中选择“打印”或“打印预览”命令时，Excel将不会进行打印。