Hi all,

I have encountered a stange bug. The bug occurs when copying an active
chartobject in Excel to PowerPoint.
(Excel is called from PowerPoint.)

The strange thing about this bug is that it occurs *only* on some pc:s not
on other.
The pc:s (stationary pc:s) have all Office 2003 sp3 MUI version and Windows
XP english all servicepacks installed.
I have tried to change the default printer with no result.

The code is as follows.

===========Code Start==============================

' Grab the existing instance of Excel
Set objExcel = GetObject(, "Excel.Application")

' If we have no Excel instance running warn the user and exit the
sub.
If objExcel Is Nothing Then
Call MsgBox(c_Message_ExcelNotStarted, vbExclamation, g_cAppTitle)
GoTo Routine_Exit
End If

' If no selected chart warn user and exit sub.
If objExcel.ActiveChart Is Nothing Then
Call MsgBox(c_Message_ExcelNoChart, vbExclamation, g_cAppTitle)
GoTo Routine_Exit
End If

===========Code End==============================

The error occurs in this part:

' If no selected chart warn user and exit sub.
If objExcel.ActiveChart Is Nothing Then
Call MsgBox(c_Message_ExcelNoChart, vbExclamation, g_cAppTitle)
GoTo Routine_Exit

End If

It fails on this line
objExcel.ActiveChart

and throws the error.

"Application or user-defined error"

Anybody has seen this before?

Thanks for help.

/Ulrik