Я знаю, что это старый вопрос, но он принят так, как будто для него нет простого решения, в то время как есть:
Да, можно, но этобыть атрибутом фактического объекта и не наследоваться родительскими объектами (ну, у меня были отрицательные результаты в этой ситуации).
' Make a new description for the object
Set desc = Description.Create()
desc("micclass").Value = "WebButton" ' assuming webbutton here
desc("Class Name").Value = "YourClassName"
' This returns a collection with buttons matching your description
Set Btns = Browser("YourBrowser").Page("YourPage").ChildObjects(desc)
For BtnIndex = 0 to Btns.Count - 1
' This will show you the display style, so you can make a selector here
MsgBox "Button " & BtnIndex & " has display style: " & Btns(BtnIndex).Object.currentStyle.Display
Next