请教在什么Sub ()里如何写代码？

OKK

向大家请教个问题不知可否实现：

Private Sub Workbook_Open()
   查找EXCEL中有没有已经打开的工作簿，如有则本工作簿不打开，退出。
如没有则本工作簿打开
End Sub
下面在什么Sub

()里写代码我不知道了？
   本工作簿打开后，监视有没有其它工作簿将要打开，如有则本工作簿关闭，退出。
End Sub
望各位高手帮助。

pureshadow

事件代码，可以直接选取，不需要写的。

OKK

谢谢[:50] [:50] [:50]

刘志文

学习一下!![:50]