Diagramm importieren

Bild

Betrifft: Diagramm importieren
von: Marcel
Geschrieben am: 03.12.2003 07:20:13

Moin moin,
ich habe immer noch folgendes Problem: Ich will 2 Diagramme aus 2 unterschiedlichen Exceldateien in ein anderes Blatt kopieren. In einem anderen Forum konnte man mir nicht helfen. Hier habe ich folgendes Makro gefunden, bekomme aber immer eine Fehlermeldung.

Laufzeitfehler '438'
Objekt unterstützt die oder Eigenschaft oder Methode nicht.


Sub DiagrammExportImport()
   Dim pctDiagramm As Object
   Sheets("Diagramm1").Export "test.gif"
   Application.DisplayAlerts = False
   Sheets("Diagramm1").Delete
   Application.DisplayAlerts = True
   Worksheets.Add after:=Worksheets(Worksheets.Count)
   Set pctDiagramm = ActiveSheet.Pictures.Insert("test.gif")
   Kill "test.gif"
End Sub


Ich kenn auch die Einstellung, sich in mehreren Foren um Hilfe zu bemühen. Ist sonst nicht meine Art, aber ich benötige gaaaanz dringend Hilfe!!!!

Gruß Marcel
Bild


Betrifft: AW: Diagramm importieren
von: Michael Scheffler
Geschrieben am: 03.12.2003 08:53:30

Hi,

WO tritt denn der Fehler auf?

Gruß

Micha


Bild


Betrifft: AW: Diagramm importieren
von: Marcel
Geschrieben am: 03.12.2003 10:26:46

Sub DiagrammExportImport()
Dim pctDiagramm As Object
Sheets("Diagramm1").Export "test.gif"

bis dahin komm ich.
Das Blatt ist auch benannt in "Diagramm1"


Bild


Betrifft: AW: Diagramm importieren
von: GerdW
Geschrieben am: 03.12.2003 13:04:15

Du musst einen Speicherpfad angeben, siehe Hilfe zu Export.

Gerd


Bild


Betrifft: AW: Diagramm importieren
von: Marcel
Geschrieben am: 03.12.2003 13:52:28

haut hin. Danke!!!


Bild

Beiträge aus den Excel-Beispielen zum Thema " Diagramm importieren"