BBQ
New Member
- Joined
- Aug 22, 2007
- Messages
- 9
Hello everybody !
i got just started with VBA in Excel so here is my question:
how can i open a link on a page of a webbrowser in a separate tab
and copy what is inside the page to a table ?
Now the link is like this:
http://www.tonermaus.de/main_02.asp?sid={0A01180F-6099-48E5-B2FE-87B23A4CA092}&login=&nav01=8
As u can see there are lots of links on this site, my qustion is to open them all by one and copy the text to an excel table.
I got also some code alredy for beginning:
Sub Firecracker()
myUrl = "http://www.tonermaus.de/main_02.asp?sid={0A01180F-6099-48E5-B2FE-87B23A4CA092}&login=&nav01=8"
Set oIE = CreateObject("InternetExplorer.Application")
oIE.Visible = True
oIE.Navigate myUrl
While Not oIE.ReadyState = 4
DoEvents 'gives the control back to windows shedule
Wend
Set oIE = Nothing
End Sub
So that code only opens the page. Like i said before just for starting.
I hope somebody can help me out here so please let me know.
Code would be nice....
Thanks and greetings
N.
i got just started with VBA in Excel so here is my question:
how can i open a link on a page of a webbrowser in a separate tab
and copy what is inside the page to a table ?
Now the link is like this:
http://www.tonermaus.de/main_02.asp?sid={0A01180F-6099-48E5-B2FE-87B23A4CA092}&login=&nav01=8
As u can see there are lots of links on this site, my qustion is to open them all by one and copy the text to an excel table.
I got also some code alredy for beginning:
Sub Firecracker()
myUrl = "http://www.tonermaus.de/main_02.asp?sid={0A01180F-6099-48E5-B2FE-87B23A4CA092}&login=&nav01=8"
Set oIE = CreateObject("InternetExplorer.Application")
oIE.Visible = True
oIE.Navigate myUrl
While Not oIE.ReadyState = 4
DoEvents 'gives the control back to windows shedule
Wend
Set oIE = Nothing
End Sub
So that code only opens the page. Like i said before just for starting.
I hope somebody can help me out here so please let me know.
Code would be nice....
Thanks and greetings
N.