Gostaria de saber como faço para preencher o campo.
Já tentei varias combinações para preencher o textbox destacado na foto, mas nada funciona.
Tentei coisas como:
IE.document.all("stk bs-Stake_TextBox").innerText = 1
IE.document.getElementsByClassName("stk bs-Stake_TextBox").Value = "5"
IE.document.getElementsByClassName("bs-Stake").Focus
código que tenho até o momento:
Sub CliqueEmBotaoBet365()
Dim IE As New SHDocVw.InternetExplorer
Dim oSelect As HTMLInputButtonElement
IE.Visible = True
'O ideal é que a pessoa pare o codigo aqui e navege manualmente, pois a bet365 nao vavega direito
IE.navigate "https://www.bet365.com/#/AVR/B144/"
Do While IE.readyState <> READYSTATE_COMPLETE
Loop
Application.Wait TimeSerial(Hour(Now()), Minute(Now()), Second(Now()) + 5)
'Selecionar o 5º mercado dos esportes virtuais(Quando eu ja estava na pagina dos virtuais)
IE.document.getElementsByClassName("vr-VirtualsNavBarButton_Label ")(4).Click
'Seleciona a odd do 1º corredor
IE.document.getElementsByClassName("vr-ParticipantVirtualOddsOnly_Odds")(0).Click
'DEVERIA COLOCAR A APOSTA, MAS NAO FUNCIOBA
IE.document.getElementsByClassName("bs-Stake") = "5"
' IE.Quit
' Set IE = Nothing
End Sub