Evento click vba

[candioti]

Amigos, bom dia !

Preciso de ajuda em um evento click, não estou conseguindo executar o mesmo quando o valor do ID é achado
getElementsByTagName("button") = "__bar2-btnGo", após entrar na condição do if e for verdadeiro, o evento click não faz nada, nem erro retorna. Desde já obrigado.

Código: Selecionar todos

<button id="__bar2-btnGo" data-sap-ui="__bar2-btnGo" aria-describedby="__text22" title="Iniciar" class="sapMBarChild sapMBtn sapMBtnBase sapMBtnInverted"><span id="__bar2-btnGo-inner" class="sapMBtnEmphasized sapMBtnHoverable sapMBtnInner sapMBtnText sapMFocusable"><span class="sapMBtnContent" id="__bar2-btnGo-content"><bdi id="__bar2-btnGo-BDI-content">Iniciar</bdi></span></span></button>
<span id="__bar2-btnGo-inner" class="sapMBtnEmphasized sapMBtnHoverable sapMBtnInner sapMBtnText sapMFocusable"><span class="sapMBtnContent" id="__bar2-btnGo-content"><bdi id="__bar2-btnGo-BDI-content">Iniciar</bdi></span></span>
<span class="sapMBtnContent" id="__bar2-btnGo-content"><bdi id="__bar2-btnGo-BDI-content">Iniciar</bdi></span>

Como tentei abaixo:

Código: Selecionar todos

[float=left]Set objCollection = IE.Document.getElementsByTagName("button")
For Each objElement In objCollection
If objElement.ID = "__bar2-btnGo" Then objElement.Click
  textoButton = objElement.ID
Next objElement


Set objCollection = IE.Document.getElementsByTagName("button")
For Each objElement In objCollection
If objElement.ID = "__bar2-btnGo" Then IE.Document.getElementById("__bar2-btnGo").Click
  textoButton = objElement.ID
Next objElement[/float]

[webmaster]

O botão está ativo ou visível no momento do click? Tentou forçar via javascript?

[candioti]

O Botão está ativo e visível até o momento do click, como forço via java?

[webmaster]

Mostro como se faz isso neste vídeo, lá pelo minuto 24

https://www.youtube.com/watch?v=1wgSxzwUSIQ