Click auf Checkbox rückgängig machen
28.08.2002 16:30:42
Mick McLaut
ich habe ein kleines Script, welches durch einen Klick auf eine Checkbox "angestossen" wird. Ich möchte nun eine Meldung anzeigen, die mir zwei Möglichkeiten gibt (Ja/Nein). Das ist kein Problem. Allerdings soll, wenn man auf [Nein] klickt, das Häkchen nicht gesetzt werden [was die ursprüngliche Eigenschaft war] (checkbox1.value = false).
Wenn ich in der If-Klausel diesen Befehl eingebe, fängt das Programm wieder an von vorne zu laufen. Ist mir auch klar warum (ich ändere ja den Status wieder von true auf false. Durch den ursprünglichen Klick wurde der Haken ja gesetzt und hat das Script angestossen.
Kennt jemand eine Möglichkeit das zu umgehen. ...Ach ja einfach sollte Sie sein, da ich kein Crack bin.
Hier das vereinfachte Script:
Sub CheckBox3_Click()
mldg = msgbox("Klicken Sie auf ja oder nein"), vbYesNo
If mldg = vbYes Then
MsgBox "ja will ich "
else
MsgBox "Nein, will ich nicht"
CheckBox3.Value = False => Hier liegt wohl das Problem
Exit Sub
End if
end sub