Passwords on Web Queries

[msraga]

Hello,

I have never used macros, so I was hoping for a bit of help.. I created a spreadsheet that took a table from a protected webpage and added it to excel (not expecting that it would not update the next day, due to the passwords). I did this with 8 different tables from different webpages. I wrote a bit of a macro to sign into the website, but I cant seem to figure out how to navigate to the correct page, grab the right table, and then paste it in the spreadsheet.

Any help would be greatly appreciated!
Thanks, Matt

Sub myWebOpenPW()
'Open site if it requires a PassWord Model!
Dim IE As Object

Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True

'Go to this Web Page!
IE.Navigate "http://www.gomeznetworks.com/login.asp"

'Wait for window to open!
Application.Wait (Now + TimeValue("0:00:05"))
'MsgBox "Done"
IE.Visible = True

'Send log-on information!
SendKeys "msraga", True 'put username here
SendKeys "{TAB}", True
SendKeys "password", True 'put password here
SendKeys "{ENTER}", True

'Wait for window to open!
Application.Wait (Now + TimeValue("0:00:06"))
'MsgBox "Done"
IE.Visible = True

End Sub