623工作簿的 Sheetactivate 事件代码 SheetActivate事件在工作簿的当前工作表欧变时产生,在此对工具 栏中按扭的可用性选行控制。如景当前工作表为“总分”或“信 息”,则使工具栏“統计”按钮不可用,否则可用。 Private Sub Workbook SheetActivate( By Val Sh As Object) If ActiveSheet. Name=“总分” Or activeSheet.Name=“信息” Then butt1 enabled= False Else butt1 enabled True End if 合 End sub6.2.3 工作簿的SheetActivate 事件代码 SheetActivate事件在工作簿的当前工作表改变时产生，在此对工具 栏中按钮的可用性进行控制。如果当前工作表为“总分”或“信 息” ，则使工具栏“统计”按钮不可用，否则可用。 Private Sub Workbook_SheetActivate(ByVal Sh As Object) If ActiveSheet.Name = “总分” Or ActiveSheet.Name = “信息” Then butt1.Enabled = False Else butt1.Enabled = True End If End Sub