Textbox in UF ... Zahlenformat Prozent
21.09.2006 02:03:55
proxima05
"#,##0.00" in "#,##0.00%" abzuändern geht nicht; keine Eingabe in der Textbox. Als zweites Argument soll die Textbox leer bleiben, wenn keine Zahl eingegeben wird.
Private Sub Coupon_AfterUpdate()
Coupon = Format(Coupon, "#,##0.00")
End Sub
Private Sub Coupon_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Not IsNumeric(Coupon) Then
Coupon = ""
Cancel = True
End If
End Sub
Sicherlich hat jemand eine Antwort.
Vorab schon mal besten Dank.
Proxima
Anzeige