JSA宏关闭Application.ShowDialog窗口

function test_closewindow(){
    let lpWindowName = "wps网站"; //窗口标题
    let lpClassName = "Qt5QWindowIcon"
    let dialogHwnd = Application.ExecuteExcel4Macro(`CALL("user32","FindWindowA","JFF","${lpClassName}","${lpWindowName}")`)    
    Application.ExecuteExcel4Macro(`CALL("user32","PostMessageA","JJJJJ",${dialogHwnd},16,0,0)`)
}

可能还有内部API实现手段，但没找到相关属性和方法