摘要:
Private WithEvents Application As Word.Application Private Sub Application_DocumentBeforeClose(ByVal Doc As Word.Document, Cancel As Boolean) End Sub 阅读全文
摘要:
Private WithEvents Application As Outlook.Application Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Outlook.Search) End Sub Pri 阅读全文
摘要:
Private Sub Application_AfterDragDropOnSlide(ByVal Sld As PowerPoint.Slide, ByVal X As Single, ByVal Y As Single) End Sub Private Sub Application_Afte 阅读全文
摘要:
Private WithEvents Application As Excel.Application Private Sub Application_AfterCalculate() End Sub Private Sub Application_NewWorkbook(ByVal Wb As E 阅读全文