Thanks Tim.

Do I use this like below:

Sub Button4_Click()
a = GetHTMLDocument("removed")
b = a.Document.body.innerText
End Sub

??(cos that doesn't work :) )

or do I need to set something up first? Not exactly au fait with this side
of things.

Cheers.
"Tim Williams" <saxifrax@pacbell*dot*net wrote in message
...
'Find an IE window with matching location and get a reference
' to the document object from the loaded page. Assumes no frames.
Function GetHTMLDocument(sAddress As String) As Object

Dim objShell As Object, objShellWindows As Object, o As Object
Dim retVal As Object, sURL As String


Set retVal = Nothing
Set objShell = CreateObject("Shell.Applicatio*n")
Set objShellWindows = objShell.Windows


'see if IE is already open
For Each o In objShellWindows
sURL = ""
On Error Resume Next
sURL = o.Document.Location
On Error GoTo 0
If sURL < "" Then
If sURL Like sAddress & "*" Then
Set retVal = o.Document
Exit For
End If
End If
Next o


Set GetHTMLDocument = retVal
End Function


Tim



"spaceman" wrote in message
...
Thanks for the thoughts, but no :(

A web page is opened, and an account number is entered. We press tab and
the relevant account screen opens. The URL is always the same for all
accounts, so I can't navigate to the web page. It has to be by using an
existing window.

I've seen posts on getting data from other applications, but IE is
different.

If I could navigate to the web page I could do it in a sinch, as I've
done that before, but createobject is no help here.

"quartz" wrote in message
...
Sorry, I misread your first post. You could try:

Sub test2()

Dim iNet As Object
Dim sURL As String
sURL =
"http://msdn.microsoft.com/newsgroups/default.aspx?dg=microsoft.public.excel.programming &lang=en&cr=US"
Set iNet = GetObject(, "InternetExplorer.Application")
iNet.Visible = True
iNet.Navigate sURL
End Sub

But, the above often generates an error. Failing this, would it work to
just
open the page in Excel as in:

Workbooks.Open ("http://myURL")

"quartz" wrote:

Hi, this may help a little bit...

The following will load a new instance of IE and navigate to this web
site:

Sub test()

Dim iNet As Object
Dim sURL As String
sURL =
"http://msdn.microsoft.com/newsgroups/default.aspx?dg=microsoft.public.excel.programming &lang=en&cr=US"
Set iNet = CreateObject("InternetExplorer.Application")
iNet.Visible = True
iNet.Navigate sURL
End Sub

HTH/

"spaceman" wrote:

Is there anyway/alternative method of using GetObject for Internet
Explorer?

Is there a workaround for GetObject? I saw some things yesterday but
it
seemed to involve downloading something, which doesn't work for me at
work
(we're not supposed to use downloaded things etc). And IE doesn't
add
itself to the existing applications listing (or whatever it's called)
like
programs that are associated to file extensions - excel, word, adobe
etc.

Basically, I want to target an existing IE window, the name of it
will be
unique, and then from there, either copy the contents of that web
page into
a cell, or be able to target a textbox on that page called xxfundsxx
(for
example) to return the contents of that textbox into a variable.

Navigating to the page and then getting the data (which I can do, but
is not
possible in this situation) won't work due to it being an IE based
application that is always the same web page, but it extracts data
for
different accounts etc when it is opened. Has to be from an existing
window.

Cheers.