Von |
Manuel |
Am |
22. Dezember 2007 um 01:32:02 |
Frage |
Hallo Zusammen, ich habe ein TextBox + Button in einem UserForm. ich versuche den Wert 1,23456 (5 Dezimalstellen)in eine Zelle zu übertragen, ich habe den Wert des TextBoxs als Currency deklariert.
MyWert as Currency MyWert = TextBox1.value Cells(1,1)= MyWert.
ich habe gelesen dass beim Currency nur 4 Dez.Stellen klappen.
Bis jetzt habe ich nur eine Idee gehabt.... MyWert as long MyWert = TextBox1.value Cells(1,1) = MyWert / 100000
Es ist ja nicht elegant, und ich kann nur in den TextBox den Wert ohne Nachkommastellen eingeben.
Hat jemand eine bessere Idee?
Vielen Dank in Voraus.
Manuel.
|
|