=ROUND(C13*2,0)/2
to have it automaticright click sheet tabview codecopy/paste thismodify
to suitsave

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 3 Then Exit Sub'restricted to col C
Target.Value = Round(Target * 2, 0) / 2
End Sub

--
Don Guillett
SalesAid Software

"Jean-Paul De Winter" wrote in message
...
Hi,

I want a value like 4.4 to be rounded to 4.5 upon entering
Values like:
6.1 should be 6
4.6 should be 4.5
4.8 should be 5

Any idea?

it should be invoked when leaving the corresponding cell...

Thanks