Hei Nenad
Int er ingen god måte å konvertere til en streng. Prøv enten
str = CStr(var)
eller (om du er bekymret for mulige desimaler)
str = CStr(CLng(var))
Jeg vil tro du har løpt på et presisjonsproblem som oppstår i desimale og
binære tall. Les
http://www.cpearson.com/excel/rounding.htm
for litt teori.
Om var alltid er et tall, og det bør det være av hensyn til de påfølgende
operasjoner her, så deklarer heller som Double enn som Variant. Variant er
bare en pointer til et minne av ukjent størrelse og type.
--
HTH. Beste hilsen Harald
Followup to newsgroup only please
"Nenad" <nenad@dragic.com> skrev i melding
news:d89574e7.0403120106.461c539c@posting.google.com...
> Hejsa
>
> Jeg har et lille problem i et et program.
> Jeg har kogt det hele ned til nogle få linier:
>
> Dim var As Variant
> Dim str As String
>
> var = 2074.99 '2074.99
>
> var = Abs(var) '2074.99
> var = var * 10 ^ 2 '207499
>
> str = Int(var) '207498
>
> Jeg mister et øre i mit beløb.
> Jeg kan gætte mig til at min variant tror at det er en float eller
> decimal at den få ind.
>
> Er min eneste løsning at lave dette:
> str = Int(var + 0,5)
>
> Jeg vil helst ikke ændre om på mine variabel typer for at ikke
> ødelægge mit interface.
>
> På forhånd tak
> Nenad