Thread: goalseek macro rounds to two decimals. need 3!

hi everyone,
i have a macro which goalseeks a cell to a user input number.
However, when I put a number like 0.505 for the macro to goal seek, I end up with a final number of 0.51. Is there any way to get it to goal seek to 3 decimal places?

THANKS in advance!!!
...
i = 4
Target = Cells(7, i).Value
While Target <> "End"
Cells(9, i).Select
Cells(9, i).GoalSeek Goal:=Target, ChangingCell:=Cells(33, i)
i = i + 1
Target = Cells(7, i).Value
Wend

...

Just guessing here but would this work....

Range("ENTER YOUR OUTPUT CELL HERE").Select
Selection.NumberFormat = "0.000"

nope this doesn't work either

Scale up your values (ie multiply them all by 10) then run the Goalseek and divide the result by 10 to get it to your 3dp.