通过cscript.exe启动Excel时Bloomberg API刷新失效如何解决

非交互式场景下通过脚本启动Excel时，默认不会加载用户级的第三方COM加载项。Bloomberg Excel插件属于非内置加载项，任务计划程序调用cscript启动的Excel进程未自动加载该插件，导致插件提供的RefreshAllWorkbooks、RefreshAllStaticData宏不可用，触发报错。

方案1：在VBA宏中主动加载Bloomberg插件 #

在原有刷新代码前新增插件加载逻辑，代码示例：

' 加载Bloomberg核心插件
On Error Resume Next
' 优先调用已注册的Bloomberg加载项
AddIns("Bloomberg Excel Add-in").Installed = True
If Err.Number <> 0 Then
    ' 未找到注册项时从默认安装路径直接加载，路径可根据实际安装位置调整
    AddIns.Add(Filename:="C:\blp\API\Office Tools\BloombergUI.xla", CopyFile:=False).Installed = True
End If
On Error GoTo 0

' 等待3秒确保插件初始化完成，可根据实际情况调整时长
Application.Wait Now + TimeValue("00:00:03")

' 原有刷新逻辑
Application.Run "RefreshAllWorkbooks"
Application.Run "RefreshAllStaticData"

方案2：修改cscript调用的VBS启动脚本 #

在VBS脚本启动Excel后强制加载Bloomberg插件，避免修改原有Excel宏代码，示例：

Set objExcel = CreateObject("Excel.Application")
' 调试时可设置为True，观察Excel界面加载情况
objExcel.Visible = False
' 降低宏安全等级，避免宏被拦截
objExcel.AutomationSecurity = 1

' 遍历所有可用加载项，主动启用Bloomberg相关加载项
For Each addin In objExcel.AddIns
    If InStr(1, addin.Name, "Bloomberg", vbTextCompare) > 0 Then
        addin.Installed = True
    End If
Next

' 打开目标工作簿并执行宏
objExcel.Workbooks.Open "C:\你的文件路径\目标工作簿.xlsm"
objExcel.Run "你的宏名称"
objExcel.ActiveWorkbook.Save
objExcel.Quit
Set objExcel = Nothing

方案3：调整任务计划程序配置 #

• 不要勾选「不管用户是否登录都要运行」，该配置会启动会话0下的Excel进程，无法加载用户级的Bloomberg插件，改为勾选「只在用户登录时运行」
• 勾选「使用最高权限运行」，避免权限不足导致插件加载失败
• 「操作」配置中的「起始于」字段填写目标Excel文件所在的文件夹路径，不要留空

如果调整后仍报错，可按以下步骤定位问题：

• 将VBS脚本中的objExcel.Visible设置为True，运行脚本后检查Excel顶部菜单栏是否出现Bloomberg选项卡，确认插件是否加载成功
• 确认当前用户已正常登录Bloomberg终端，无未处理的登录弹窗、授权弹窗拦截插件运行
• 检查Excel信任中心配置，已将Bloomberg插件所在文件夹、目标Excel文件所在文件夹加入受信任位置，未禁用第三方COM加载项

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