ich habe einen Button und zwei Diagramme. Einmal klicken auf den Button Diagramm 27 erscheint, ein zweites mal auf den Button Diagramm 20 erscheint. Aktuell erscheint nur Diagramm 27. Aber ich würde eben gerne zwischen beiden Diagrammen wechseln :)
Sub Commandbutton_Wechsel_CLick()
ActiveSheet.Shapes("Diagramm 27").Visible = Not ActiveSheet.Shapes("Diagramm 27").Visible
ActiveSheet.ChartObjects("Diagramm 20").Visible = False
ActiveSheet.Shapes("Diagramm 20").Visible = Not ActiveSheet.Shapes("Diagramm 20").Visible
ActiveSheet.ChartObjects("Diagramm 27").Visible = False
End Sub
Habt ihr eine Idee?
Viele Grüße
Christian