Kontrollkästchen ausblenden

Forumthread: Kontrollkästchen ausblenden

30.04.2002 15:54:33

Michael

Hallo Forum!

Ist es möglich, ein Kontrollkästchen abhängig von einem Zellwert ein- und auszublenden? Wenn in J5 ein Wert X steht soll daneben das Kontrollkästchen eingeblendet werden. Läßt sich so etwas "einfach" erstellen?

Danke im voraus!

Michael

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Re: Kontrollkästchen ausblenden

30.04.2002 16:10:00

Jochen

hi,

ist eigentlich recht einfach:

du musst in den VisualBasic Editor wechseln (Alt und F11).
Dort stehen unter dem Ordner "Microsoft Excel Objekte" alle
Tabellenblätter die es in der Mappe gibt.
Wenn du den entsprechenden Eintrag Doppelklickst musst du den untenstehenden Code nur in den Code Editor (rechts) reinkopieren.

Private Sub Worksheet_Change(ByVal Target As Range)
If Me.Cells(5, 10).Value = "5" Then
CheckBox1.Visible = True
Else
CheckBox1.Visible = False
End If
End Sub

Du musst nur schauen, ob das kontrollkästchen auch "CheckBox1"
heisst, das geht über Eigenschaften.

Immer wenn eine Zelle geändert wird springt das Programm in den
Code und schaut, ob der Zelleninhalt = 5 ist.

Hoffe es geht

Gruss

Jochen

Re: Kontrollkästchen ausblenden

30.04.2002 17:11:01

Michael

Leider schaffe ich das nicht. Ich habe 31 Kontrollkästchen untereinander stehen, für die das jeweils zutreffen sollte.
Wo finde ich die Eigenschaften eigentlich?

Gruß Michael

Zusatzmitteilung

30.04.2002 17:20:48

Michael

Außerdem existiert hier schon eine Private Sub mit dem gleichen Namen: Private Sub Worksheet_Change(ByVal Target As Excel.Range)

Infobox / Tutorial

Kontrollkästchen abhängig von Zellwert ein- und ausblenden

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Um ein Kontrollkästchen abhängig von einem Zellwert ein- oder auszublenden, folge dieser Anleitung:

Öffne den Visual Basic Editor: Drücke Alt + F11, um den Editor zu öffnen.
Wähle dein Arbeitsblatt: Im Projektfenster auf der linken Seite findest du den Ordner "Microsoft Excel Objekte". Doppelklicke auf das Arbeitsblatt, in dem du die Kontrolle einrichten möchtest.

Füge den Code ein: Kopiere den folgenden Code in das rechte Fenster:

Private Sub Worksheet_Change(ByVal Target As Range)
   If Me.Cells(5, 10).Value = "5" Then
       CheckBox1.Visible = True
   Else
       CheckBox1.Visible = False
   End If
End Sub

Prüfe die Kontrollkästchen-Eigenschaften: Stelle sicher, dass das Kontrollkästchen den Namen "CheckBox1" hat. Wenn nicht, ändere den Namen im Eigenschaftenfenster.
Teste die Funktion: Ändere den Wert in Zelle J5 und beobachte, ob das Kontrollkästchen entsprechend ein- oder ausgeblendet wird.

Häufige Fehler und Lösungen

Fehler: Kontrollkästchen wird nicht angezeigt
- Lösung: Überprüfe, ob der Name des Kontrollkästchens korrekt ist. Du kannst den Namen über die Eigenschaften im Visual Basic Editor herausfinden.
Fehler: Mehrere Kontrollkästchen
- Lösung: Wenn du 31 Kontrollkästchen hast, musst du für jedes Kontrollkästchen einen ähnlichen Code erstellen oder eine Schleife verwenden, um alle Kontrollkästchen zu steuern.
Fehler: Mehrere Private Sub
- Lösung: Wenn bereits eine Private Sub Worksheet_Change existiert, musst du die Bedingungen in diese Sub integrieren, anstatt eine neue zu erstellen.

Alternative Methoden

Falls du keine VBA-Programmierung verwenden möchtest, gibt es auch andere Alternativen:

Formeln verwenden: Du kannst mit einer Formel in einer benachbarten Zelle arbeiten, um anzuzeigen, ob das Kontrollkästchen aktiviert werden sollte.
Datenüberprüfung: Nutze die Datenüberprüfung in Excel, um Auswahlmöglichkeiten zu erstellen, die den Status des Kontrollkästchens steuern.

Praktische Beispiele

Wenn in Zelle J5 der Wert "5" steht, soll das Kontrollkästchen sichtbar sein. Dies kannst du für verschiedene Zellwerte anpassen, um unterschiedliche Kontrollkästchen zu steuern.

Beispiel für mehrere Kontrollkästchen:

Private Sub Worksheet_Change(ByVal Target As Range)
   Dim i As Integer
   For i = 1 To 31
       Me.Controls("CheckBox" & i).Visible = (Me.Cells(5, 10).Value = i)
   Next i
End Sub

Tipps für Profis

Verwende Namensbereiche: Um deinen Code übersichtlicher zu gestalten, kannst du Zellreferenzen als Namensbereiche definieren.
Fehlerbehandlung: Implementiere Fehlerbehandlungsroutinen im VBA-Code, um unerwartete Fehler elegant abzufangen.
Testen: Teste den Code in einer Kopie deiner Datei, bevor du ihn in dein Hauptdokument überträgst.

FAQ: Häufige Fragen

1. Frage
Kann ich die Sichtbarkeit von mehreren Kontrollkästchen gleichzeitig steuern?
Antwort: Ja, du kannst eine Schleife verwenden, um die Sichtbarkeit mehrerer Kontrollkästchen basierend auf Zellwerten zu steuern.

2. Frage
Wie finde ich die Eigenschaften meiner Kontrollkästchen?
Antwort: Du kannst die Eigenschaften im Visual Basic Editor unter dem Menü "Ansicht" -> "Eigenschaftenfenster" anzeigen.

Beliebteste Forumthreads (12 Monate)

Forumthread: Kontrollkästchen ausblenden

3 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Infobox / Tutorial

Kontrollkästchen abhängig von Zellwert ein- und ausblenden

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread