L'URL NON SI MODIFICA

Ciao a tutti

mi ricollego al post precedente https://www.iprogrammatori.it/forum-programmazione/access/effettuare-login-navigare-tramite-vba-t44837.html

Navigando nel sito tramite VBA, mi sono accorto che non mi modifica la LocationURL e di conseguenza la LocationName.

Di seguito, il codice:

Function test_cssc()
Dim myUrl As String
Dim myId As String
Dim myPass As String


Dim IEObject As Object
Set IEObject = New InternetExplorer
IEObject.Visible = True
myUrl = "http://cssc.coldiretti.it/jsso/SSOLogin?appurl=http%3A%2F%2Fcssc.coldiretti.it%2FUserProfiler%2Fjsp%2FuserConfig.faces&appid=%2FUserProfiler#cssc.coldiretti.it#80"
IEObject.Navigate myUrl

ieBusy IEObject

Debug.Print IEObject.LocationName

    Dim IEDocument As HTMLDocument
    Set IEDocument = IEObject.Document

    myId = "xxxx.yyyyy"
    IEDocument.Forms(0).Item("username").Value = myId
    myPass = "*******"
    IEDocument.Forms(0).Item("password").Value = myPass
    IEDocument.Forms(0).submit.Click
    
    ieBusy IEObject
    
        IEObject.Navigate2 ("http://cssc.coldiretti.it/EIPortal/login.do")

        ieBusy IEObject

        Debug.Print IEObject.LocationName
      
End Function

Sub ieBusy(IE As InternetExplorer)
    Do While IE.Busy Or IE.ReadyState > 4
        Sleep 1000
        DoEvents
    Loop
End Sub

Qui, la finestra immediata:

Login SSO Java
Login SSO Java

Ho provato pure a mettere uno sleep nella sub ieBusy, ma stesso risultato.

Inoltre, facendo passo-passo invece l'url e il name vengono cambiati correttamente.

Qualche suggerimento?