Ciao gizmo86, benvenuto nel forum.
Ti consiglio di usare questa variante della macro GetTabbb, usata piu' volte per automatizzare raccolta dati da web:
- Codice: Seleziona tutto
Sub GetTabbb()
'
myURL = "http://www.stat-football.com/en/t/ita10.php?c=23"
Set ie = CreateObject("InternetExplorer.Application")
With ie
.navigate myURL
.Visible = True
MsgBox ("Naviga sui risultati che ti servono; POI premi Ok")
Do While .Busy: DoEvents: Loop 'Attesa not busy
Do While .readyState <> 4: DoEvents: Loop 'Attesa documento
End With
'
myStart = Timer 'attesa addizionale
Do
DoEvents
If Timer > myStart + 2 Or Timer < myStart Then Exit Do
Loop
'Leggi le tabelle <<<
Worksheets.Add '..su un nuovo foglio
'Sheets("Foglio3").Select '..OPPURE su un foglio esistente
'Cells.Clear '....che viene azzerato all' inizio
Set mycoll = ie.document.getElementsByTagName("table")
aaaa = mycoll.Length
Set myitm = mycoll(3)
'For Each myItm In my2coll
For Each trtr In myitm.Rows
For Each tdtd In trtr.Cells
Cells(I + 1, J + 1) = tdtd.innerText
J = J + 1
Next tdtd
I = I + 1: J = 0
Next trtr
I = I + 1
'Next myItm
'Stop 'Vedi testo
'Chiusura IE
ie.Quit
Set ie = Nothing
End Sub
La macro apre la pagina web in una sessione sua di InternetExplorer e si ferma con un messagebox che invita a completare la navigazione per ottenere i risultati che si desiderano; dopo l' Ok al messagebox la macro raccoglie il contenuto della tabella e chiude InternetExplorer.
Operativamente:
-da excel, Alt-F11 per aprire l' editor delle macro
-Menu /Inserisci /Modulo
-copia il codice e incollalo nel frame vuoto di dx
Torna poi su excel e manda in esecuzione la macro (Alt-F8, scegli GetTabbb dall' elenco che ti propone, premi Esegui) e controlla l'esito.
Il codice apre sempre un nuovo foglio per raccogliere i risultati; se vuoi invece usare un foglio gia' presente allora devi editare le righe che seguono il testo"Leggi le tabelle", mettendo un apostrofo in testa a Worksheets.Add e toogliendolo alle due righe successive.
Il codice funziona oggi, nulla garantisce che funzionera' anche domani, dipendendo in gran parte dall' analisi del sorgente html della pagina.
Ciao