using the "Application.InputBox" script problem

Occasional Visitor

 I have been using a script that lets me enter by prompt data then It puts it into the cell I assigned.

When the number entered has a "." decimal point, such as 1234.3467, the number inserted in the cell is 1234.0000 without the .3467.  This script did work before, but now it's not working.

I use

"DP19 = Application.InputBox(Prompt:="Enter ID,",-

               Title:="Display ID 19",-

              Default:=("0.0000"),-      (note: I have also tried ("0") same results


All numbers have a 4 digit decimal code.

Anybody have any ideals?


1 Reply


!t works for me using 365 home on win 10. I had to format the target cell as numeric with the appropriate decimal places. Apologies if this is too obvious and your platform has another issue.