sHola,
Alguien sabe como hacer para logearse a una pagina web desde el codigo de
excel.
he probado distintos codigo que he encontrado en internet pero todavia no he
tenido exito
el codigo que uso es el siguiente:
Sub login()
Dim ieApp As Object
Dim objBox As Object
Dim objBox1 As Object
Set ieApp = CreateObject("InternetExplorer.Application")
ieApp.Visible = True
ieApp.navigate
("
https://www.bernstein.com/Reports/Summary.aspx?nid8&relid565692")
Do While ieApp.busy
DoEvents
Loop
On Error Resume Next
Do While objBox Is Nothing
Set objBox = ieApp.document.getelementbyid("UserName")
DoEvents
Loop
objBox.Value = Range("A" & CStr(ActiveCell.Row)).Value
Set objBox1 = ieApp.document.getelementbyid("password")
objBox1.Value = Range("B" & CStr(ActiveCell.Row)).Value
End Sub
el user name y la password las tengo en la celda A1 y B1
con este codio logro escribir el user y la password pero nada mas , no se
abre la pagina que quiero. Alguien tiene una idea de como solucionar el
problema u otro codigo que funcione?
muchas gracias
Leer las respuestas