Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Check Box - auf unchecked zuruecksetzen

Forumthread: Check Box - auf unchecked zuruecksetzen

Check Box - auf unchecked zuruecksetzen
15.06.2006 11:41:19
Daniel
Hi Excel-user,
ich wuerde gerne mit einem makro das auf verschiedene bedingungen reagiert die vom enduser angeklickte checkbox mittels einem makro wieder auf unchecked stellen.
sagen wir mal so: der user klickt eine checkbox an, zugleich ist aber eine zweite ist schon zuvor angeklickt worden. Nun moechte ich mit einem makro beide checkboxen auf unchecked setzten und der user kann von vorne anfangen.
Ich hab keine Ahnung ob das ueberhaupt moeglich ist daher wende ich mich an euch waere tierisch dankbar fuer ein paar tips das hinzubekommen.
herzlichen dank schon im voraus!!!
daniel
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Check Box - auf unchecked zuruecksetzen
15.06.2006 11:48:00
Michael
probier mal das aus:
If Checkbox2.Value = True Then
CheckBox1.Value = False
End If
Ich denke das dein Problem damit behoben ist
Gruß
Michael
AW: Check Box - auf unchecked zuruecksetzen
15.06.2006 11:49:57
Harald
Etwa so:

Private Sub CheckBox2_Click()
CheckBox1.Value = False
End Sub

Gruß Harald
Anzeige
AW: Check Box - auf unchecked zuruecksetzen
16.06.2006 10:30:29
Daniel
Hallo!
hab beide versionen ausprobiert, aber dennoch es nicht hinbekommen die checkboxen zu unchecken.
ich hab mir eine einfachere version ueberlegt:
user clickt checkbox 97 oder 46 oder 47 an und ausgegeben werden soll msgbox, danach soll das makro die haekchen der checkboxen entfernen. ohne weiteren value link des boxen inhalts.
ist das moeglich? hoffe mir kann jemand den entsprechenden code verraten.
danke fuer euere hilfe schon im voraus!
viele gruesse daniel
'click on checkbox 97 or 46 or 47
'macro start

Sub sorry()
'flcs   = checkbox97
'epoxy  = checkbox46
'copper = checkbox47
MsgBox ("Sorry, this option is not available yet. R&D is working on it.")
'set checkboxes back to unchecked/false
'CheckBox97 unchecked
'CheckBox46 unchecked
'CheckBox47 unchecked
End Sub

Anzeige
AW: Check Box - auf unchecked zuruecksetzen
16.06.2006 14:17:20
Harald
Mit drei Checkboxen so:
Option Explicit

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
Call AnyBoxChecked(1)
End If
End Sub


Private Sub CheckBox2_Click()
If CheckBox2.Value = True Then
Call AnyBoxChecked(2)
End If
End Sub


Private Sub CheckBox3_Click()
If CheckBox3.Value = True Then
Call AnyBoxChecked(3)
End If
End Sub


Private Sub CommandButton1_Click()
Unload Me
End Sub


Private Sub AnyBoxChecked(i As Integer)
MsgBox "checkbox" & i & "checked"
CheckBox1.Value = False
CheckBox2.Value = False
CheckBox3.Value = False
End Sub

Denk dran, dass Du diesen Code im Codebereich der Userform eingeben musst, nicht im Codebereich des Moduls.
Gruß Harald
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Check Box in Excel zurücksetzen: So funktioniert's


Schritt-für-Schritt-Anleitung

Um eine Check Box in Excel mittels VBA zurückzusetzen, kannst Du folgende Schritte ausführen:

  1. Öffne dein Excel-Dokument und gehe in den Entwicklermodus.
  2. Füge eine Userform ein, falls Du dies noch nicht getan hast.
  3. Platziere deine Check Boxes (z.B. CheckBox1, CheckBox2) auf der Userform.
  4. Füge einen CommandButton hinzu, um das Makro auszuführen.

Hier ist ein einfaches Beispiel, wie Du die Check Boxes zurücksetzen kannst:

Private Sub CommandButton1_Click()
    CheckBox1.Value = False
    CheckBox2.Value = False
End Sub

Falls Du möchtest, dass eine Check Box automatisch die andere zurücksetzt, kannst Du den folgenden Code verwenden:

Private Sub CheckBox1_Click()
    If CheckBox1.Value = True Then
        CheckBox2.Value = False
    End If
End Sub

Häufige Fehler und Lösungen

  • Problem: Die Check Box wird nicht zurückgesetzt.

    • Lösung: Überprüfe, ob der Code im richtigen Bereich (Userform) eingegeben wurde. Der Code sollte nicht im Modulbereich sein.
  • Problem: Der Wert der Check Box wird nicht korrekt gesetzt.

    • Lösung: Stelle sicher, dass Du den richtigen VBA-Befehl verwendest, z.B. CheckBox1.Value = False für eine unchecked Box.

Alternative Methoden

Wenn Du nicht mit VBA arbeiten möchtest, kannst Du auch die integrierten Optionen in Excel verwenden:

  1. Wähle die Check Box aus.
  2. Klicke mit der rechten Maustaste und wähle „Format Control“.
  3. Setze den „Cell Link“ auf eine Zelle, und verwende dann eine Formel wie =FALSE, um die Check Box zurückzusetzen.

Praktische Beispiele

Hier sind einige Anwendungsbeispiele:

  • Einfaches Beispiel für Multiple Check Boxes:
Private Sub CheckBox1_Click()
    If CheckBox1.Value = True Then
        CheckBox2.Value = False
        CheckBox3.Value = False
    End If
End Sub
  • Beispiel mit MsgBox und Zurücksetzen:
Sub Beispiel()
    MsgBox "Das ist ein Beispiel!"
    CheckBox1.Value = False
    CheckBox2.Value = False
End Sub

Tipps für Profis

  • Verwende Option Explicit: Dies hilft, Fehler durch nicht deklarierte Variablen zu vermeiden.
  • Nutze Subroutinen: Wenn Du mehrere Check Boxes hast, erstelle eine separate Subroutine, die alle zurücksetzt, um den Code sauber und wartbar zu halten.
  • Führe Testläufe durch: Teste Deinen VBA-Code regelmäßig, um sicherzustellen, dass alles wie gewünscht funktioniert.

FAQ: Häufige Fragen

1. Wie setze ich mehrere Check Boxes auf einmal zurück?
Du kannst eine Subroutine erstellen, die alle Check Boxen zurücksetzt, wie im Beispiel oben gezeigt.

2. Was ist der Unterschied zwischen True und False bei einer Check Box?
True bedeutet, dass die Check Box aktiviert (checked) ist, während False bedeutet, dass sie deaktiviert (unchecked) ist.

3. Kann ich mehrere Check Boxes mit einer einzigen Aktion zurücksetzen?
Ja, Du kannst eine Schleife verwenden oder eine separate Subroutine erstellen, die alle gewünschten Check Boxes zurücksetzt.

4. Was mache ich, wenn mein VBA-Code nicht funktioniert?
Überprüfe, ob der Code im richtigen Bereich (Userform) und ob die Namen der Check Boxes korrekt sind.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige