Vba Web Project - Data from web to Excel sheet

[icemail]

Hi All,

I need your helps about my VBA project

I did something my project but i couldn't progress more. My problem is that I need player statistic tables
I can process and make show player list in VBA
But problem is starting after this.
I should open player statistics and some tables
I wanna need a code. This code must open Someone NBA player statistic page and use 2 tables. It is tables "Advanced" and "Playoffs Per Game". I wanna this all players in list. Tables will show in 1 excel sheet

thx

Those are my created codes, if you wanna you can examine.

i dont write url because my post banned
Post denied. New posts are limited by number of URLs it may contain and checked if it doesn't contain forbidden words.




Sub openie()

Dim ie As Object

Set ie = CreateObject("internetexplorer.application")

Dim pname As Variant
pname = Array("a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "y", "z")

For i = LBound(pname) To UBound(pname)

With ie
.Visible = True
'url ==> basketball-reference.com
.navigate 'url & pname(i) & "/"

Do While .readyState <> 4 Or .Busy: DoEvents: Loop
Set ObjHTML = .document.body.getElementsByTagName("table")
End With

Next i

ie.Quit

End Sub