If objCollection(i).Name = 'txtUserName' Then ' You can uncoment Next line To see form results Private Sub Open_multiple_sub_pages_from_main_page() With the kind help from Tim Williams, I finally figured out the last détails that were missing. Anymore kind help will be so appreciated. The second time I get a runtime error 70: permission denied. But then when I try to do links(j).click 'j = 2 this time

I then save it, close, and come back to the main form. Now I'm able to select the first subform button to open it. Set objCollection = IE.Document.getElementsByTagName('input')

' Send the form data To URL As POST binary request Set IE = CreateObject('InternetExplorer.Application') It works the first time, but when I do it againĬould someone point me how to determine how many of those button there is in the page and how to click on each?įollowing I'm placing the code I have until now and below it, the HTML code of the page I need to interact with. So my updated code below use a loop to open every other subform. I know how to click on a button when it has a 'name'. I can't know in advance how many sub-forms there will be to open. See code below.Īt this point I need to click on a button to open sub-forms. Right now I'm able to load the page, enter my username and password and then entering the time sheet by itself. I'm trying to use excel to automate the value entering in a time sheet.

Vba internet explorer document