randy street
Member
- Messages
- 442
- Location
- Elgin, IL
There were a couple people asking how to download an entire vBulletin thread.
You can use some VBA code to loop through each page and download into Excel.
I found this on the web and pasted it in an excel module. I had it loop through all Martys "Birth of a Shop" thread on SMC and download into an excel page. Took about 3 minutes to get his entire thread.
Sub Read_URL_Test()
With ActiveSheet.QueryTables.Add(Connection:="URL;http://www.sawmillcreek.org/printthread.php?t=36894&pp=40", _
Destination:=Range("a1")) 'write web-page to sheet
.BackgroundQuery = True
.TablesOnlyFromHTML = True
.Refresh BackgroundQuery:=False
.SaveData = True
End With
End Sub
I'm sure with all the computer knowledge most people on here have, you can make this do some interesting things.
Regards
Randy
You can use some VBA code to loop through each page and download into Excel.
I found this on the web and pasted it in an excel module. I had it loop through all Martys "Birth of a Shop" thread on SMC and download into an excel page. Took about 3 minutes to get his entire thread.
Sub Read_URL_Test()
With ActiveSheet.QueryTables.Add(Connection:="URL;http://www.sawmillcreek.org/printthread.php?t=36894&pp=40", _
Destination:=Range("a1")) 'write web-page to sheet
.BackgroundQuery = True
.TablesOnlyFromHTML = True
.Refresh BackgroundQuery:=False
.SaveData = True
End With
End Sub
I'm sure with all the computer knowledge most people on here have, you can make this do some interesting things.
Regards
Randy