求助：VBA调用UIAutomationCore.dll在IE11锁屏时无法下载文件的解决办法

这问题我之前帮同事排查过类似的，核心原因是Windows锁屏后，交互式桌面会话会被系统切换到非交互模式——你用的UIAutomationCore是依赖当前用户的交互式会话来识别和操作UI元素的，锁屏后这个会话挂起，自然没法触发IE通知栏的保存按钮了。下面给你几个可行的解决方案，按优先级排序：

1. 绕开UI交互，直接用HTTP请求下载（最推荐） #

既然你的目标是下载文件，完全没必要通过操作IE通知栏这种UI方式实现。VBA可以直接发送HTTP请求获取文件内容，全程后台运行，锁屏状态下完全不受影响，还比UI自动化稳定得多。

示例代码如下：

Sub DownloadFileViaHTTP()
    Dim httpReq As Object
    Dim fileStream As Object
    Dim targetUrl As String, saveLocation As String
    
    ' 替换成你的内网文件URL和保存路径
    targetUrl = "http://内网地址/目标文件.ext"
    saveLocation = "C:\Downloads\保存的文件名.ext"
    
    ' 初始化HTTP请求对象
    Set httpReq = CreateObject("MSXML2.XMLHTTP.6.0")
    httpReq.Open "GET", targetUrl, False
    
    ' 如果内网需要Windows集成身份验证（NTLM），添加这一行
    httpReq.SetOption 2, 13056 ' 启用自动身份验证
    
    ' 发送请求
    httpReq.Send
    
    ' 检查请求是否成功
    If httpReq.Status = 200 Then
        ' 写入文件
        Set fileStream = CreateObject("ADODB.Stream")
        fileStream.Open
        fileStream.Type = 1 ' 二进制模式
        fileStream.Write httpReq.responseBody
        fileStream.SaveToFile saveLocation, 2 ' 2表示覆盖已存在文件
        fileStream.Close
        
        Debug.Print "文件已成功保存到: " & saveLocation
    Else
        Debug.Print "下载失败，HTTP状态码: " & httpReq.Status
    End If
    
    ' 释放对象
    Set httpReq = Nothing
    Set fileStream = Nothing
End Sub

这个方法的优势：

• 完全脱离IE界面，不需要依赖任何UI元素
• 锁屏、用户注销（只要任务在运行）都能正常执行
• 避免了UI自动化常见的问题（比如弹窗位置变化、IE版本兼容）

2. 若必须依赖IE会话，改用任务计划程序后台运行 #

如果你的下载必须依赖IE已有的会话（比如内网需要通过IE完成复杂的身份验证流程，直接HTTP请求无法获取权限），可以把VBA宏封装成VB脚本（.vbs），然后通过Windows任务计划程序设置任务：

• 创建任务时，勾选不管用户是否登录都运行
• 选择使用最高权限运行
• 设置触发条件（比如定时触发，或者手动触发）

注意：这种方式下，IE会在后台会话（会话0）中运行，可能需要额外配置IE的安全设置，确保内网网站能正常访问。另外，UIAutomationCore在会话0中可能仍有兼容性问题，所以还是优先推荐第一种方法。

3. 禁用锁屏的UI会话限制（不推荐） #

有些企业环境可以修改组策略，让锁屏后仍保持交互式会话，但这会降低系统安全性，一般不建议这么做，而且大部分公司的IT部门不会允许这种配置。

内容的提问来源于stack exchange，提问作者Filip Ondo