Private Sub App_NewWorkbook(ByVal Wb As Workbook)
Private Sub App_SheetActivate(ByVal Sh As Object)
Private Sub App_SheetDeactivate(ByVal Sh As Object)
Private Sub App_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Private Sub App_WindowActivate(ByVal Wb As Workbook, ByVal Wn As Window)
Private Sub App_WindowDeactivate(ByVal Wb As Workbook, ByVal Wn As Window)
Private Sub App_WindowResize(ByVal Wb As Workbook, ByVal Wn As Window)
Private Sub App_WorkbookActivate(ByVal Wb As Workbook)
Private Sub App_WorkbookDeactivate(ByVal Wb As Workbook)
試過以上幾種都沒有觸發相關事件,
或者你把你的需求敘述一下,
看有沒有其他方法可以達成.作者: bobomi 時間: 2014-8-20 08:11