Outlook VBA教程:Activate事件

当浏览器或检查器成为活动窗口时发生,可以是用户操作或程序代码的结果。该事件在 VBScript 中不可用。

Sub object_Activate()

object  该表达式的值为ExplorerInspector对象。

VBA示例

本代码示例在Activate事件发生时,使用WindowState属性最大化顶层的浏览器窗口。该示例代码必须放在类模块中,并且在 Microsoft Outlook 调用该事件过程前必须调用Initialize_handler 例程。


Dim myOlApp As Outlook.Application
Public WithEvents myOlExp As Outlook.Explorer
Public Sub Initialize_handler()
    Set myOlExp = myOlApp.ActiveExplorer
End Sub
Private Sub myOlExp_Activate()
    If myOlExp.WindowState = olNormalWindow Then _
        myOlExp.WindowState = olMaximized
End Sub

上页:Outlook VBA教程:编写 Outlook 宏 下页:Outlook VBA教程:AdvancedSearchComplete事件

Outlook VBA教程:Activate事件:相关链接

Outlook VBA教程:AdvancedSearchComplete事件 Outlook VBA教程:AdvancedSearchStopped事件
Outlook VBA教程:AttachmentAdd事件 Outlook VBA教程:AttachmentRead事件
Outlook VBA教程:BeforeAttachmentSave事件 Outlook VBA教程:BeforeCheckNames事件
Outlook VBA教程:BeforeDelete事件 Outlook VBA教程:BeforeFolderSwitch事件
Outlook VBA教程:BeforeGroupAdd事件 Outlook VBA教程:BeforeGroupRemove事件
Outlook VBA教程:BeforeGroupSwitch事件 Outlook VBA教程:BeforeItemCopy事件
Outlook VBA教程:BeforeItemCut事件 Outlook VBA教程:BeforeItemPaste事件
Outlook VBA教程:BeforeMaximize事件 Outlook VBA教程:BeforeMinimize事件
Outlook VBA教程:BeforeMove事件 Outlook VBA教程:BeforeNavigate事件
Outlook VBA教程:BeforeReminderShow事件 Outlook VBA教程:BeforeShortcutAdd事件
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号