VBA internet log-in fra Excel
Hej alleJge har en del brugere på hjemmesiden Istockphoto.com som hver har en bruger id og et password for at logge ind.
Alle brugere administrerer jeg i Excel, og vil meget gerne lave et link i excel, hvor jeg kan trykke, og så hopper den direkte til hjemmesiden, og logger ind på en bruger.
Jeg har forsøgt mig med denne kode, men den stopper ved det sidste(automation error). Kan I gennemskue hvad jeg gør forkert ?
Nogen der kan hjælpe med en kode der faktisk virker :-(
Tak forud
jakob
Sub Test()
Set ie = CreateObject("InternetExplorer.application")
ie.Visible = True
ie.Navigate ("https://secure.istockphoto.com/sign-in/aHR0cCUzQSUyRiUyRnd3dy5pc3RvY2twaG90by5jb20lMkY=" & ActiveCell)
Do
If ie.ReadyState = 4 Then
ie.Visible = False
Exit Do
Else
DoEvents
End If
Loop
ie.Document.Forms(0).all("identity").Value = "me"
ie.Document.Forms(0).all("credential").Value = "mypasssword"
ie.Document.Forms(0).submit
End Sub