Automation Object error

[dirk_2909]

Hallo,

Hallo ich habe in einer Maske Script (LS), dass anhand von Werten im Dok ein ExcelChart erzeugt.
Es klappt auch alles prima :-) ...... bei benutzern mit Excel 2000  (9.0).

bei benutzern mit Excel 2003 (11.0) läuft das Script auf einen Fehler in folgender Zeile:
.Location xlLocationAsObject, strName

?

Hier ein kleiner Auszug vom Script drumrum:

Code

With xlApp.ActiveWorkbook.ActiveChart
		.Name = strName
		.HasTitle = True
		.HasLegend = False
		.ChartTitle.Text = "Umsatzentwicklung " & doc.KundNr( 0 )
		.ChartType = xlChartType 
		.PlotArea.Interior.ColorIndex = "0" 
	        .Location xlLocationAsObject, strName
	
End With 

Ich habe schon viel gegoogelt, gesucht (MSDN, etc) aber keine Unterschiede bei den beiden Versionen feststellen können?!

Kann mir jemand helfen, bzw. einen Tipp geben wo ich suchen kann?

Danke

[botschi]

Irgendwo müsste bei Dir stehen
"... ExcelApplication.8" oder .7 oder so

Ändere das mal auf 6, 7, oder 8.

[dirk_2909]

bei mir steht nur:

Code

	Set xlApp = CreateObject("Excel.Application") 
	
	xlApp.Visible = False 'set to invisible 
	

 

[dirk_2909]

Habe erst mal die Zeile

Code

Set xlApp = CreateObject("Excel.Application") 

folgendermaßen geändert:

Code

Set xlApp = CreateObject("Excel.Application.9") 

-> klappt bei mir / Excel 2000

Code

Set xlApp = CreateObject("Excel.Application.8") 
Set xlApp = CreateObject("Excel.Application.7") 
Set xlApp = CreateObject("Excel.Application.6") 

-> laufen bei mir auf einen Fehler 

Der Test mit:

Code

Set xlApp = CreateObject("Excel.Application.11") 

mit Excel 2003 ist noch offen....... 

[dirk_2909]

Die o.g. Änderung hat nichts gebracht 

werde mal weiter recherchieren, was sich da wohl geändert hat ?!