在保存Excel工作簿的同时将密钥发送到Adobe Report-Builder插件

Question

我正在尝试让VB打开Excel，保存工作簿（在宏运行之后），然后关闭工作簿。问题在于我有一个Adobe Report-Builder插件（用于将Adobe Analytics拉入工作表），该插件设置为在启动此特定工作簿时运行（通过宏）。这不是一个问题，除了它有自己的一组弹出提示在退出之前保存工作簿。因此，当我希望工作簿关闭时，我无法使用以下代码，因为Adobe弹出/提示需要关注

xlWb.Save
xlWb.Close SaveChanges=True
xl.Quit

所以我需要向该活动窗口发送一个“enter”键（点击“yes”保存）。到目前为止我有这个。我不确定sendkey命令是否正常工作，或者我是否需要将该命令指向焦点/活动窗口。

Sub RunMacro()
Set xl   = CreateObject("Excel.application")
Set xlWb = xl.Workbooks.Open("C:\Users\me\Documents\workbook.xlsm")
xl.Application.Visible = True
xl.Application.run "'workbook.xlsm'!RefreshAllReportBuilderRequests"
WScript.Sleep 60000 
xlWb.Close
WScript.Sleep 2000 
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.SendKeys "{ENTER}"
Set xlWb = Nothing
Set xl   = Nothing
Set shell  = Nothing
End Sub