Private Sub Coupon_AfterUpdate()
Coupon = Format(Coupon, "#,##0.00")
End Sub
Wäre nett, wenn mir jemand einen Tipp geben könnte.
Die obige TB ist Teil eines UF, das aus mehreren TBen besteht. gibt es da eine Möglichkeit nur eine
Private Sub zu schreiben, in der dann in einem Rutsch die Formate für die einzelnen TBen festgelegt werden .... anstellte von einer
Private Sub für jede Textbox.
Besten Dank
Proxima