Im userform mit Euro Rechnen

Forumthread: Im userform mit Euro Rechnen
1 Beitrag zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Im userform mit Euro Rechnen

Sebastian

Hallo,
ich stehe bissel auf dem Schlauch. Ich habe ein Userform in dem ich 3 Textboxen habe.
Textbox1.value = Format(Worksheets("Daten").Range("E10").Value, "#,##0.00") & " " 'Preis in
In Textbox2 trage ich die Anzahl ein.
Jetzt möchte ich sobald ich in Textbox2 eine Anzahl eingebe die Berechenung in Textbox3 ausgeführt wird.
Textbox3.value = Textbox2.value * Textbox1.value
Das gibt allerdings Fehler wegen der Formatierung.
Hat jemand eine Idee wie ich in Textboxen mit Euro Rechnen kann?
Vielen Dank
Sebastian

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Benutzer

AW: Im userform mit Euro Rechnen

Reinhard

AW: Im userform mit Euro Rechnen

10.06.2011 16:03:31

Reinhard

Hallo Sebastian,

Private Sub UserForm_Initialize()
TextBox1.Value = Format(Range("a1").Value, "#,##0.00 ")
TextBox2.SetFocus
End Sub
Private Sub CommandButton1_Click()
TextBox3.Value = Format(TextBox1.Value * TextBox2.Value, "#,##0.00 ")
End Sub

Gruß
Reinhard