I think that 429 means that the the GetObject couldn't find a running instance
of MSIE.
So you check to see if it finds one. If it does, use it. If not, create a new
one.
Dim mybrowser As Object
On Error Resume Next
Set mybrowser = GetObject(, "InternetExplorer.Application")
If Err.Number = 429 Then
Set mybrowser = CreateObject("Internetexplorer.application")
mybrowser.Visible = True
Err.Clear
End If
On Error GoTo 0
DM wrote:
I have written a macro that makes use of internet
explorer. The following code works properly on my
system. However, when I attempt to run the exact same
code on a different computer, perhaps with a slightly
different version of office (though they are both office
2000) it fails. The error message is: "Run-time Error
429: ActiveX Component Can't Create Object."
The code is:
Sub import()
' import Macro
Dim mybrowser As SHDocVw.InternetExplorer
Set mybrowser = GetObject(, "InternetExplorer.Application")
....
The failure occurs when the 'Set mybrowser...' line is
executed.
Any suggestions would be helpful.
--
Dave Peterson