Outlook VBA教程:ActiveWindow方法

返回代表桌面上顶层 Microsoft Outlook 窗口的对象,该对象可以为ExplorerInspector对象。如果不存在打开的 Outlook 浏览器或检查器,则返回 Nothing。

expression.ActiveWindow

expression  必选。该表达式返回Application对象。

VBA示例

本 Microsoft Visual Basic/Visual Basic for Applications 示例在顶层的 Microsoft Outlook 窗口为检查器窗口时,最小化该窗口。


Dim myOlApp As New Outlook.Application
If TypeName(myOlApp.ActiveWindow) = "Inspector" Then
    myOlApp.ActiveWindow.WindowState = olMinimized
End If

如果使用 VBScript,则不创建Application对象,而且也不能使用命名常量。本示例说明如何使用 VBScript 执行相同任务。


If TypeName(Application.ActiveWindow) = "Inspector" Then
    Application.ActiveWindow.WindowState = 1
End If

上页:Outlook VBA教程:ActiveInspector方法 下页:Outlook VBA教程:Add方法

Outlook VBA教程:ActiveWindow方法:相关链接

Outlook VBA教程:Add方法 Outlook VBA教程:AddMember方法
Outlook VBA教程:AddMembers方法 Outlook VBA教程:AddStore方法
Outlook VBA教程:AddToFavorites方法 Outlook VBA教程:AddToPFFavorites方法
Outlook VBA教程:AdvancedSearch方法 Outlook VBA教程:Apply方法
Outlook VBA教程:Assign方法 Outlook VBA教程:CancelResponseState方法
Outlook VBA教程:ClearConversationIndex方法 Outlook VBA教程:ClearRecurrencePattern方法
Outlook VBA教程:Close方法 Outlook VBA教程:Copy方法
Outlook VBA教程:CopyFile方法 Outlook VBA教程:CopyTo方法
Outlook VBA教程:CreateItem方法 Outlook VBA教程:CreateItemFromTemplate方法
Outlook VBA教程:CreateObject方法 Outlook VBA教程:CreateRecipient方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号