我在名为“ DTR-MR”的工作表中有此代码,并且我有一个Worksheet Activate
事件,如果我按原样切换到工作表,则该事件不会触发。代码是:
Option Explicit
Private Sub Worksheet_Activate()
ThisWorkbook.Worksheets("DTR-MR").Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:="stamping123123123"
End Sub
类似地,另一个在激活时锁定工作表的工作表也不会激活,如下所示:
Option Explicit
Private Sub Worksheet_Activate()
ThisWorkbook.Worksheets("Pay-MR").Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:="stamping123123123"
End Sub
但是,工作表中的其他Worksheet Activate
事件可以毫无问题地触发内部代码。错误事件中的代码行得通,因为如果我手动运行代码,或单步执行代码(F8),工作表将被锁定。