| Von |
BerndR |
| eMail |
|
| Am |
21. Februar 2008 um 11:09:19 |
| Frage |
Hallo,
Private Sub Form_Load() 'Userform mit Feldern Text1, Text2, Text3
Dim Zahl1 As Currency, Zahl2 As Currency, Ergebnis As Currency
Zahl1 = 202.458
Zahl2 = 55.458
Ergebnis = Zahl1 * Zahl2
Text1 = Format(Ergebnis, "##,##0.00")
Text2 = Format(61400.4, "##,##0.00") 'Willkürliche Zahl
'Text3 = Text1 + Text2 'Ergebnis : 11.227,925.459,40 (Aneinanderreihung)
Text3 = Format(Text1 + Text2, "##,##0.00")
'Ergebnis ebenfalls : 11.227,925.459,40 (Aneinanderreihung
'Text3 = Zahl1 + Zahl2 'Ergebnis richtig : 257,916
End Sub
Meine Routine multiplitiert, dividiert und subtrahiert richtig, nur addieren tut sie nicht!
Kann mir jemand sagen warum?
Gruß BerndR |
|
Zum Seitenanfang