当激活任一工作簿时产生此事件。
Private Sub app_WorkbookActivate(ByVal Wb As Workbook)
app 在类模块中带有事件声明的 Application 类型对象。有关详细信息,请参阅 Application 对象事件的用法。
Wb 激活的工作簿。
当激活一个工作簿时,本示例对所有打开的窗口进行排列。
Private Sub App_WorkbookActivate(ByVal Wb As Workbook)
Application.Windows.Arrange xlArrangeStyleTiled
End Sub