Necesito extraer información de varias páginas web, y me gustaría saber como puedo hacer esto con una macro. Tengo esta función con la que creo un objeto 'Internet Explorer', pero necesito información de referencia sobre este objeto o un ejemplo de como simular el hacer click en un link.
- Código: Seleccionar todo
Function stuff()
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
IE.Navigate "http://www.google.com" 'load web page google.com
While IE.Busy
DoEvents 'wait until IE is done loading page.
Wend
IE.Visible = True
'ie is now done loading the page
IE.Document.all("q").Value = "what you want to put in text box"
'puts info into the inputbox named "q" which is google's search box.
IE.Document.all("btnG").Click 'clicks the button named "btng" which is google's "google search" button
While IE.Busy
DoEvents 'wait until IE is done loading page.
Wend
'ie is now done loading the results page
End Function