I am trying to click the button that is attached to this HTML:
<tr id="submit_row">
<td class="credentials_table_label_cell"></td>
<td class="credentials_table_field_cell">
<input disabled="" class="credentials_input_submit" type="submit" value="Sign In">
</td>
</tr>
using this VBA:
ie.Document.getElementById("submit_row").Click
I can get the name and password to fill out but can't figure out how to get the button to click, here is the full code in case it helps:
Sub test()
' open IE, navigate to the desired page and loop until fully loaded
Set ie = CreateObject("InternetExplorer.Application")
my_url = "https://mybizaccount.fedex.com/my.policy"
With ie
.Visible = True
.Navigate my_url
.Top = 0
.Left = 0
.Height = 4000
.Width = 4000
Do Until Not ie.Busy And ie.readyState = 4
DoEvents
Loop
End With
' Input the userid and password
ie.Document.getElementById("input_1").Value = "XXXXX"
ie.Document.getElementById("input_2").Value = "XXXXX"
' Click the "Search" button
ie.Document.getElementById("submit_row").Click
Do Until Not ie.Busy And ie.readyState = 4
DoEvents
Loop
End Sub
<tr id="submit_row">
<td class="credentials_table_label_cell"></td>
<td class="credentials_table_field_cell">
<input disabled="" class="credentials_input_submit" type="submit" value="Sign In">
</td>
</tr>
using this VBA:
ie.Document.getElementById("submit_row").Click
I can get the name and password to fill out but can't figure out how to get the button to click, here is the full code in case it helps:
Sub test()
' open IE, navigate to the desired page and loop until fully loaded
Set ie = CreateObject("InternetExplorer.Application")
my_url = "https://mybizaccount.fedex.com/my.policy"
With ie
.Visible = True
.Navigate my_url
.Top = 0
.Left = 0
.Height = 4000
.Width = 4000
Do Until Not ie.Busy And ie.readyState = 4
DoEvents
Loop
End With
' Input the userid and password
ie.Document.getElementById("input_1").Value = "XXXXX"
ie.Document.getElementById("input_2").Value = "XXXXX"
' Click the "Search" button
ie.Document.getElementById("submit_row").Click
Do Until Not ie.Busy And ie.readyState = 4
DoEvents
Loop
End Sub