Despite I’m just an entusiast absolutelly non pro, I’m using with moderate success an Excel vba code to fill some forms of an intranet company procedure written in html/java and download some data files. Unfortunatelly it is a private procedure with access limited to the intranet members, that’s my worry.
The problem occurs when I have to select the “start” and “end” of a date range. To do that, I need to press a button that open a new window. In the new window I should be able to set the date and the frequency (monthly or daily). The problem is that after the simple command that opens the window:
IE.Document.getElementById("idAvanzDateButton").onclick
the window opens correctly, but I havent the return to the VBA and I cannot debug or excute the rest of the lines. I donno if I must listen and trigger some event; but it is very sure that I loose the control after “.onclick” without the possibility to do something else.
Here the code html of the button got from the intranet page:
<input type="button" id="idAvanzDateButton" onclick="impostazioneAvanzataDate()" value="Impostazione avanzata" class="custom_button_midlarge">
Here my code to reach that point, but it’s very basic and still on test:
Sub ADVANCED_DATE()
'----WE START WITH INTERET EXPLORER---
Set IE = New InternetExplorerMedium
IE.Visible = True
'Define URL
url = "https://moct0.sede.corp.company.com:35779/scriptMoct0/ncg/datamart/interrogazionedinamica/start.do"
IE.navigate url
Application.Wait Now + TimeValue("00:00:07")
While IE.Busy Or IE.readyState <> 4: DoEvents: Wend
'******************
'giving input to start:
IE.Document.getElementById("idSocieta").Value = "01" 'it is the first clone to analyse
IE.Document.getElementById("idsocieta").FireEvent ("onchange")
Application.Wait Now + TimeValue("00:00:01")
'here I press the "Advanced date range" that is a button that open a new window
IE.Document.getElementById("idAvanzDateButton").Click
'the new window opens correctly, the address is now different and it's like this:
'https://moct0.sede.corp.company.com:35779/scriptMoct0/ncg/datamart/interrogazionedinamica/dgl405.do?codiceSocieta=01&elencoSocieta=
'here it stops; it doesn't give any kind of error but doesn't respond to any command and I cannot debug too with F8. So I haven't the return to the VBA and any line that follow is not executed. I'm stuck.
IE.Document.getElementById("idDataContabile").Value = "04.06.2024" 'this input, that is necessary ,isn't processed
'here follow the other input...
'I need help :) .....
End Sub
‘I tried to interact with the child window using this method, but as stated above, nothing is processed after the button and the new window:
here
I thank you in advance for your kind advices 🙂