Msg Box erscheint mehrmals
13.07.2013 12:56:22
Uli
ich hatte eine Frage bzgl. dem folgenden Code. Leider konnte ich bisher keine hilfreichen Informationen im Internet finden, deswegen wende ich mich an euch.
Im Folgenden Code soll über eine Textbox die Laufzeit einer Anleihe eingegeben werden. Das Problem ist, dass die MsgBox zweimal erscheint, da das Ereignis bei Zurücksetzen der Textbox noch einmal ausgelöst wird.
Gibt es eine Möglichkeit, dass die MsgBox nur einmal erscheint und das Ergebnis nur über die Eingabe eines neuen Wertes ausgelöst wird (der Exit Sub Command hat bei mir leider nicht funktioniert)?
Private Sub InLaufzeit_Change()
With InLaufzeit
If .Value 50 Then
MsgBox "nur positive Laufzeiten bis 50 Jahre": .Value = ""
End If
End With
End Sub
Über eure Hilfe würde ich mich freuen - schon mal vielen Dank im Voraus!
VG
Uli