Try using late binding.

Instead of

Dim xl as Excel.Application

use

Dim xl as Object

then instantiate the object by using

Set xl = CreateObject("Excel.Application")


Don't forget to remove the Excel reference from your project otherwise
you'll be defeating the point of this.


--

Regards,


Bill Lunney
www.billlunney.com

"Milko Koparanov" wrote in message
...
I've written a short procedure in VS6, which opens a new
Excel2000 application and populates a Range object:

Private Sub Populate()
Dim xl As Excel.Application, i as Integer
Set xl = New Excel.Application
xl.Visible = True
xl.Workbooks.Add
For i = 1 To 100
xl.Cells(i, i) = i ^ 2
Next i
Set xl = Nothing
End Sub

It works perfectly under WindowsXP and Windows98. But if
you have DCOM98 installed on W98 OS, it breaks on
xl.Cells(i, i) = i ^ 2
row, messaging an AUTOMATION ERROR -2147417848(80010108).
It works exactly the same way with or without Office2000
SP3, and from a VBA module of MS Office2000.

Thanks for any suggestion why this could happen!

Milko Koparanov