VBA 和 UI 自动化组合框展开折叠模式

问题描述

错误无法展开组合框。 我正在尝试从组合框中获取特定值。

变量

Dim MyElement1 As UIAutomationClient.iuiAutomationElement
Dim oExpandpattern As UIAutomationClient.iuiAutomationExpandCollapsePattern

Set MyElement1 = AppObj.FindFirst(TreeScope_Children,PropCondition(oAutomation,eUIA_NamePropertyId,"Invoice No"))

Set oExpandpattern = MyElement1.GetCurrentPattern(UIA_ExpandCollapsePatternId)
oExpandpattern.Expand

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）