Supportnet / Forum / Datenbanken

Hallo zusammen bin seit heute Member, mir wurde letzte Woche so toll geholfen, da möchte ich auch mitmachen. Und gleich habe ich eine Frage: Ich habe in einer Userform mehrere Texboxen (19-23), in denen Zahlen (Rechnungsbeträge) eingegeben werden und in einer weiteren Textbox (TB 18) zusammengefasst werden. Jetzt habe ich das Problem dass, zwar in den einzelnen Textboxen das richtige Zahlenformat angezeigt wird, aber in TB 18 die Summe kein gescheites Format hat. Das Format sollte Tausendertrennung haben und zwei Nachkommastellen (Z.B.: 12.264,21). Wer kann mir helfen ? Bisher sieht das Ganze so aus: Private Sub TextBox18_Change() TextBox18.Text = Val(TextBox19.Text) + Val(TextBox20.Text) + Val(TextBox21.Text) + Val(TextBox22.Text) + Val(TextBox23.Text) End Sub Private Sub TextBox19_AfterUpdate() TextBox19 = Format(TextBox19, "#,##0.00") TextBox18_Change End Sub Private Sub TextBox20_AfterUpdate() TextBox20 = Format(TextBox20, "#,##0.00") TextBox18_Change End Sub Private Sub TextBox21_AfterUpdate() TextBox21 = Format(TextBox21, "#,##0.00") TextBox18_Change End Sub Private Sub TextBox22_AfterUpdate() TextBox23 = Format(TextBox23, "#,##0.00") TextBox18_Change End Sub Private Sub TextBox23_AfterUodate() TextBox23 = Format(TextBox23, "#,##0.00") TextBox18_Change End Sub

• in Textbox nur Zahlen mit 2 Kommastellen zulassen
• Textbox nach bestimmten Wert durchsuchen
• Wie aktiviere ich in einer Word-Textbox Zeilenumbruch und Funktion der Enter-Taste?
• Excel VBA Textbox drucken
• textbox vba format