Diagrammformatierung ändert sich bei Gruppierung

[Chris2019]

Hallo HKindler,

gelesen ja, kapiert ja, der Test ist mir dann irgendwie durchgerutscht.

Habe es jetzt aber auch getestet und es scheint zu klappen, vielen Dank! 

[Chris2019]

Kleiner Nachtrag und sorry für den Doppelpost aber es funktioniert leider doch nicht. Nach dem zweiten Mal öffnen ist es wieder zurückgesetzt.

[HKindler]

Tatsächlich!

Damit habe ich jetzt nicht gerechnet, dass es nun beim zweiten Öffnen auftritt.

Dann wird dir wohl nur noch VBA übrig bleiben. Das einfachste wäre wohl, eine Vorlage zu erstellen (hast du ja schon) und bei Bedarf diese per VBA deinen Diagrammen erneut zuzuweisen. Könnte man z.B. beim Öffnen der Datei, beim Aktivieren des Blattes oder einfach nur bei Bedarf per Knopfdruck machen.

Folgende Zeilen machen dies für alle Diagramme in allen Blättern:

Code:

Dim Blatt As Worksheet
Dim Dia As ChartObject
For Each Blatt In ThisWorkbook.Worksheets
    For Each Dia In Blatt.ChartObjects
        Dia.Chart.ApplyChartTemplate "Pfad_zur_Vorlagendatei\DeineVorlage.crtx"
    Next Dia
Next Blatt

[Chris2019]

Das komische ist, zurückgesetzt werden nur die, die ich offen hatte. Alle die zu sind bleiben auch bei mehrmaligem Schließen in der Ursprungsversion. Sehr mysteriös. 

Das mit dem VBA muss ich mir in Ruhe mal ansehen, da kenne ich mich nicht so sehr aus. Das ist wohl eine Hausaufgabe für das Wochenende.  Danke auf jeden Fall!

[HKindler]

Hi,

wenn du keine großen Anforderungen hast, dann ergänze bei dem Code am Anfang z.B. Sub ResetDia() und an Ende End Sub. Du kannst das Makro natürlich auch anders nennen. Dann fügst du irgendwo einen Button ein und weist diesem das Makro zu. Nicht vergessen die Datei dann als *.xlsm zu speichern. Aber Achtung: es werden ALLE Diagramme in der Datei auf die Vorlage gesetzt.