Köntrollkästchen erscheinen und sichtbar bleiben

Hallo,
ich habe wiedermal ein Problem und brauche dringend Hilfe.
Ich habe ein Kontrollkästchen und ein Textfeld in denen Zahlen stehen.
Wenn im Textfeld eine 5 oder eine 99 steht, soll sich ein Kontrollkästchen
öffnen und wahr sein. Das habe ich mit dem unten stehenden Code gelöst.

Nun möchte ich aber, dass das Kontrollkästchen bestehen bleibt, wenn ich die Zahlen aus den Textfeldern lösche.
Gibt es dafür einen Befehl den ich in meinen Code einbauen kann?

Warum ich das möchte? Das Kontollkästchen weist daraufhin, dass die Zahlen überschrieben worden sind. Daher muss das Kontollkästchen aktiviert bleiben, wenn die Zahlen wieder gelöscht werden.

Danke für Eure Hilfe Emma

Private Sub Textfeld_BeforeUpdate(Cancel As Integer)
If Me!Textfeld = „5“ Or Me!Textfeld = „99“ Then
Me!Kontrollkästchen.Visible = True
Else
Me!Kontrollkästchen.Visible = False
End If

If Me!Kontrollkästchen.Visible = True Then
Me!Kontrollkästchen = True
Else
Me!Kontrollkästchen = False
End If
End Sub

Hallo Emma,

in der Hoffnung Dich richtig verstanden zu haben (Du sagst nicht genau, wenn Zustand die Häckchen habne sollen, wenn gelöscht wurde): Du koppelst den Status der Häckchen an die Sichtbarkeit. Besser wäre bei der Initialisierung der Form die Sichtbarkeit auf Falsch zu setzen und bei ersten Eintreffen auf Wahr. Also mehr

Private Sub Textfeld_BeforeUpdate(Cancel As Integer)
If Me!Textfeld = „5“ Or Me!Textfeld = „99“ Then
Me!Kontrollkästchen.Visible = True
Me!Kontrollkästchen = True
Else
Me!Kontrollkästchen = False
End If

Ist es das was Du wolltest?

MfG Georg V.

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Hallo Emma,

in der Hoffnung Dich richtig verstanden zu haben (Du sagst
nicht genau, wenn Zustand die Häckchen habne sollen, wenn
gelöscht wurde): Du koppelst den Status der Häckchen an die
Sichtbarkeit. Besser wäre bei der Initialisierung der Form die
Sichtbarkeit auf Falsch zu setzen und bei ersten Eintreffen
auf Wahr. Also mehr

Private Sub Textfeld_BeforeUpdate(Cancel As Integer)
If Me!Textfeld = „5“ Or Me!Textfeld = „99“ Then
Me!Kontrollkästchen.Visible = True
Me!Kontrollkästchen = True
Else
Me!Kontrollkästchen = False
End If

Ist es das was Du wolltest?

MfG Georg V.

Hallo Georg,

Leider ist es nicht das was ich brauche.

Das Kontrollkästchen ist immer sichtbar mit diesem Code, d.h. wenn ich mal eine 1-4 rein schreibe ist es trotzdem sichtbar, das soll es aber nicht.
Und ausserdem verschwindet das Häkchen im Kontrollkästchen wieder, wenn ich die Zahl z.B. 5 rausnehme, das soll es auch nicht.
Wenn der Haken einmal drin ist soll er drin bleiben.

Ich weiß ist ziemlich verwirrend, aber ich bräuchte diese Funktion.

Trotzdem Danke für deine Hilfe, hättest du noch eine andere Idee oder werden mehr Informationen benötigt?

Emma

Hallo Emma,

vieleicht hilfts sorum:

Private Sub Textfeld_BeforeUpdate(Cancel As Integer)
If Me!Textfeld = „5“ Or Me!Textfeld = „99“ Then
Me!Kontrollkästchen.Visible = True
Me!Kontrollkästchen = True
Else
Me!Kontrollkästchen.Visible = False
End If

Wobei hier der Harken auf „True“ bleibt wenn er einmal gesetzt ist, und nur die Sichtbarkeit aus/eingeschaltet wird.

Hope this helps

Tschau
Peter

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Danke für deine Antwort,
werde es mal probieren.

Viele Grüße Emma