Clever-Excel-Forum

Hey,

ich hoffe wir kommen erstmal ohne Datei aus. Ist im Prinzip recht simpel, aber ich sehe wohl den Wald vor lauter Bäume nicht.
Ich habe eine Datei mit 2 Tabellenblättern. Diagramm und Tabelle1.
Aus Tabelle1 heraus erstelle ich per Makro neue Tabellenblätter mit Inhalt. Wenn ich auf einem der neuen Tabellenblätter bin möchte ich per Makro, das Diagramm HINTER das aktuelle Tabellenblatt einfügen.
Habe mal folgenden Code aus dem nichts geschrieben, aber dieser geht nicht wirklich. Gerne etwas Erklärung zu euren Codes, so lerne ich am besten.

Code:
   Diagramm.Select

    Diagramm.Copy

    Sheets.Add after:=ActiveSheet

    ActiveSheet.Paste

Es soll nicht nur der Inhalt sondern auch das Format übertragen werden.

Manchmal reicht es auch einfach aus, mit dem Makrorekorder zu arbeiten...

Code:
Sheets("Diagramm").Copy after:=ActiveSheet

'alternativ

Sheets("Diagramm").Copy after:=Sheets("Diagramm")     'das spart die Selektiererei

Wenn du das Blatt komplett kopierst, wieso sollten die Formate nicht übertragen werden?

Hey Berni,

danke dir. Sleepy

elamigo

MisterBurns

elamigo