Hi All,

I have written a Macro that performs a web query and copies the data.

The problem I have is that the user has to log in to Internet Explorer first so that the password is cached. I have written a little routine but I do not know how to put the routine into a loop until the user has closed the Internet Explorer windows that I created.

I know I could probably create my only dialog prompt and send the text the user enters to InternetExplorer but I don't want to do this.

I want to start the IE object, wait for how ever long it takes the user to enter their username / password and then once they have closed IE, resume the Macro.

I have searched but have not found a solution to this problem.

Thanks in advance.

Sub Logon2(Q_url)
    Dim ExtranetUser As String
    Dim ExtranetPass As String

    Set ie = CreateObject("InternetExplorer.Application")
    With ie
        .Visible = True
        .Navigate Q_url
'       Do Until .ReadyState = READYSTATE_COMPLETE
        While 1
            DoEvents
        Wend
'        Loop
    End With
End Sub