Excel 2007 -> IE 7 with VBA

[Engywook]

Most of what I can find online with this seems to presuppose that I'm using IE6, an older version of Excel, or in most cases both.

I need Excel to be able to look for and address multiple windows, or tabs, in Internet Explorer. The basic syntax - for older builds of these two apps, I think, is something like this:

'SHDocVw is not recognized
Dim objIE As SHDocVw.InternetExplorer
Set objSW = New SHDocVw.ShellWindows
For Each objIE In objSW
Debug.Print "found one window"
'of course we want to do much more than this, but since we cant even get this far...
Exit For

This, I'm guessing, isn't right for IE7, but I'm not having much luck finding out what is. And even if it were, I would need to check on Microsoft Internet Controls reference under tools... which is not available in Excel 2007.

Anybody got some code, or a link, that can get me started?

 

[PHV]

A starting point:

Dim objShell, objWindows, objWindow, strMsg
Set objShell = CreateObject("Shell.Application")
Set objWindows = objShell.Windows
For Each objWindow In objWindows
  strMsg = strMsg & vbCrLf & objWindow.LocationURL
Next
MsgBox "Active URLs" & strMsg

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[Engywook]

PH -

That did the trick... thanks!