estoy tratando de utilizar una macro para realizar búsquedas en internet (google específicamente), pero no logro dar con el texto del código fuente para insertarlo en la linea de código.
agradecería mucho que me dieran una mano, gracias
Sub LoginGOOGLE()
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
With IE
.Top = 0
.Left = 0
.Height = 1000
.Width = 1250
.Visible = True
.Navigate "https://www.google.com/"
Do While .Busy Or Not .ReadyState = 4: DoEvents: Loop
.Document.getelementbyid("gLFyf gsfi").Value = "buscar lo que sea en google"
.Document.getelementbyid("Buscar con Google").Click
End With
End Sub
saludos
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.
Hola, como estan?
estoy tratando de utilizar una macro para realizar búsquedas en internet (google específicamente), pero no logro dar con el texto del código fuente para insertarlo en la linea de código.
agradecería mucho que me dieran una mano, gracias
Sub LoginGOOGLE() Dim IE As Object Set IE = CreateObject("InternetExplorer.Application") With IE .Top = 0 .Left = 0 .Height = 1000 .Width = 1250 .Visible = True .Navigate "https://www.google.com/" Do While .Busy Or Not .ReadyState = 4: DoEvents: Loop .Document.getelementbyid("gLFyf gsfi").Value = "buscar lo que sea en google" .Document.getelementbyid("Buscar con Google").Click End With End Sub
saludos