Seite 1 von 1
Diagramme ausblenden
Verfasst: Do, 20.12.2012 08:53
von zero82
Hallo liebes Forum,
ich möchte gerne per Listenfeld zwei Kategorien einbauen, mit der ich zwei Diagramme aus- bzw. einblenden möchte.
Kategorie A zeigt Diagramm A und Kategorie B zeigt Diagramm B an.
Ich habe folgendes ausprobiert aber er zeigt mir immer einen Fehler an. Woran kann das liegen?
Code: Alles auswählen
Private Sub Diagramm()
If CheckBox1.Value = True Then
ActiveSheet.ChartObjects("Diagramm1").Visible = True
ActiveSheet.ChartObjects("Diagramm2").Visible = False
Else
ActiveSheet.ChartObjects("Diagramm1").Visible = False
ActiveSheet.ChartObjects("Diagramm2").Visible = True
End If
End Sub
Danke schonmal
zero82
Re: Diagramme ausblenden
Verfasst: Do, 20.12.2012 11:22
von juetho
zero82 hat geschrieben:Ich habe folgendes ausprobiert aber er zeigt mir immer einen Fehler an. Woran kann das liegen?
1. Du hast nicht
Allgemeine Hinweise zur Forumsbenutzung gelesen. Sollen wir raten, welcher Fehler aufgetreten ist?
2. Es gibt das eigene Unterforum
Basic und Java. Alle Beiträge zur Programmierung mit OO gehören in dieses Unterforum.
3. Ist diese Frage eine Ergänzung zu
Bild der Listenfeld aus und einblenden? Wie kommst du darauf, sie extra und in einem anderen Unterforum zu stellen?
4. Was hat ActiveSheet mit Base zu tun? Noch ein Grund für eine falsche Fragestellung.
Nebenbei kann man so eine Fallunterscheidung einfacher formulieren:
Code: Alles auswählen
Private Sub Diagramm()
ActiveSheet.ChartObjects("Diagramm1").Visible = CheckBox1.Value
ActiveSheet.ChartObjects("Diagramm2").Visible = not CheckBox1.Value
End Sub
Gruß Jürgen
Re: Diagramme ausblenden
Verfasst: Do, 20.12.2012 11:38
von zero82
OK,
soll ich dann die gleiche Frage in das Forum Basic schreiben?
Re: Diagramme ausblenden
Verfasst: Do, 20.12.2012 12:17
von juetho
zero82 hat geschrieben:soll ich dann die gleiche Frage in das Forum Basic schreiben?
Nicht nötig, ein Moderator wird es verschieben. Aber ich hatte auch auf andere Unklarheiten bei deiner Frage hingewiesen. Jürgen
Nachtrag: Wozu fragst du erst, wenn du dann die Diskussion gleich neu eröffnest?
