Rund op til nærmeste 0,20 - tilrettelse

Jeg fik følgende svar på et spørgsmål om at få en pris rundet op  til nærmeste 20 øre. Problemet er dog nu at hvis en pris er på 200,00001 bliver den rundet op til 200,20. Derfor skal den først være hvis beløbet bliver 200,01, at der rundes på til 200,20

Kode stumpen ser således ud:

formatNumber(Round(CLng(Round(5*cprice + 0.5))/5,2),2)

På forhånd tak
Kristian Sørensen