Hallo Leute,
habe folgendes Problem: Ich möchte gerne aus mehreren Tabellenblätter eine Wertekopie machen, einige davon besitzen auch Diagramme. Nun habe ich folgendes Makro geschrieben:
...
Sheets(Array("Akt. ChanceRisiko-Verhältnis", "Rendite und Sicherheit", _
"Risikoeinschätzung", "Umsetzung der Optimierung", "Privatbilanz")).Copy
'Die einzelnen Tabellenblätter den Wert zuordnen
Sheets("Akt. ChanceRisiko-Verhältnis").Select
[A1:X100] = [A1:X100].Value
Sheets("Rendite und Sicherheit").Select
[A1:X100] = [A1:X100].Value
Sheets("Risikoeinschätzung").Select
[A1:X100] = [A1:X100].Value
Sheets("Privatbilanz").Select
[A1:X100] = [A1:X100].Value
Sheets("Umsetzung der Optimierung").Select
[A1:X100] = [A1:X100].Value
Leider enthalten die Diagramme immer noch Verknüpfungen. Wie bekomme ich die weg?
Danke und Gruß
Matthias