How to click a button on a webpage

[Excel_Phil]

Hello everyone, I'm trying to use a macro to click on a button on this site: https://sms.comtele.com.br/ - the button is called "conectar".

I cant seem to get right code that dentifies the button "conectar" on the HTML code and put it to be clicked in my macro.

I appreciate any help!

Thanks in advance!

 

[BarryL]

Oi, the below seemed to work for me. Although I've never looked at html before

Private Sub IE_Autiomation()
    Dim i As Long
    Dim IE As Object
    Dim objElement As Object
    Dim objCollection As Object
 
    ' Create InternetExplorer Object
    Set IE = CreateObject("InternetExplorer.Application")
 
    ' You can uncoment Next line To see form results
    IE.Visible = False
 
    ' Send the form data To URL As POST binary request
    IE.Navigate "https://sms.comtele.com.br/"
 

 
    ' Wait while IE loading...
    Do While IE.Busy
        Application.Wait DateAdd("s", 1, Now)
    Loop
 
   
 
    Set objCollection = IE.document.getElementsByTagName("input")
 
    i = 0
    While i < objCollection.Length
        If objCollection(i).Name = "Username" Then
 
            ' Set text for search
            objCollection(i).Value = "Barry"
 
        Else
            If objCollection(i).Type = "password" And _
               objCollection(i).Name = "Password" Then
               objCollection(i).Value = "Password"
 
                ' "Search" button is found
                Set objElement = objCollection(i)
 
            End If
        End If
        i = i + 1
    Wend
   Set ElementCol = IE.document.getElementsByClassName("btn btn-success")
For Each btnInput In ElementCol
    btnInput.Click
 Next btnInput
    
    ' Wait while IE re-loading...
    Do While IE.Busy
        Application.Wait DateAdd("s", 1, Now)
    Loop
 
    ' Show IE
    IE.Visible = True
 
    ' Clean up
    Set IE = Nothing
    Set objElement = Nothing
    Set objCollection = Nothing
 

End Sub

 

[BarryL]

any luck?

 

[BarryL]

any use?