在VBA中获取UIAutomationElement的可点击鼠标点

Question

我在 VBA 中使用 UIAUtomationClient。我以前试过这个，但由于某种原因它不再起作用了。我正在尝试获取 uiautomationelement 上的可点击点。

这是我在自动化模块中的代码。

Function GetMousePoint(element As IUIAutomationElement) As tagPOINT
    Dim getPoint As Variant
    getPoint = element.GetClickablePoint(GetMousePoint)
End Function

这是我在主模块中的代码。 importBtn 是 UIAutomationElement。

Dim clickAPI As tagPOINT
clickAPI = Automation.GetMousePoint(importBtn)

我不断收到编译错误，ByRef 参数类型不匹配。

Answer 1

提高参考 UI 中 UIAutomation 的优先级。