Spróbuj tak:
dim x as Double
Cytat:mam problem
dim x as single
x = Application.InputBox("podaj ułamek molowy " , , , , , , , 1)
Worksheets("dane").Cells(1, 4) = x
teoretycznie argumenty i to co zwraca ta funkacja powinny być liczbą
a kiedy wprowadzam do wyskakującego okienka np 0.4 to w komórce zostaje to zapisane jako 0,400000005960464
gdzie jest błąd i co zrobić żeby było dobrze ??????
ps. męczę się z tym ponad 5 godzin i nic nie mogę znaleźć |