Hej,

Jag skulle vilja beräkna öresavrundning i min fakturamall som jag har gjort i Word.

I ett fält som beräknas kan det stå t ex 430,04. I ett annat fält skulle jag vilja att det står "-0,04" i det här fallet.

Är detta möjligt att åstadkomma?

Tacksam för hjälp

Kör ett "makro vid avslutning" dvs det aktiveras när användaren tabbar sig ut ur fältet:


dim strOret
strOret = activedocument.formfields("namnpåfältet").Result
activedocument.formfields("namnpåfältet").Result = Right(strOret, 4) /alternativt ngn uträkning

/Ann

Hej

Jag tror att du skulle kunna ha nytta av följande formel om du vill skapa en acceptabel öresavrundning.

Den har dock det lilla felet att den inte gör en 100% korrekt avrundning. Jämn siffra skall inte normalt höjas vid 50 öre emedan en udda skall höjas. I detta fall kommer kunden säkert acceptera att du aldrig höjer för 50 öre och troligen inte klaga.

Antag att du har beloppet som skall avrundas i cellen A1 så får du korrigeringen i den cell som har denna formel.

=IF(((A1-INT(A1))>0.5);1-(A1-INT(A1));-1*((A1-INT(A1))))

Lycka till
/John