使用WScript从“错误消息”对话框中读取消息

Question

问题定义：编写wscript以单击错误消息DialogBox的“确定”按钮，并获取/读取DialogBox中给出的错误消息。 通过宏验证Excel生成错误消息。

达成：我可以点击msgbox的“确定”按钮

Stuck：我无法读取错误消息

代码编写：

Set oShell = CreateObject("WScript.Shell") 

Do 
    bResult = oShell.AppActivate("Save As") 
    If bResult = True Then 
        oShell.SendKeys "{ENTER}" 
        Exit Do 
    End If 
    WScript.Sleep 500 
Loop