Number format and decimal positions

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I am stumped.

this code is part of much larger macro.

Range(Cells(drprw, 6), Cells(drprw + 1, 6)).NumberFormat = "0.00"
numba = Round(qtytpd / qtyroutes, 2)
numbb = Round(tpaftot / qtyroutes, 2)
Cells(drprw, 6) = numba
Cells(drprw + 1, 6) = numbb

the cells are displaying numbers like 9.00 when there should be
non zero decimal positions.

if i pull the code out of the macro, and run it standalone,
it works fine.

all vars are dim'd as long.

i' ve checked the code 'after' this, and there are NO other formating
commands.
I don't know where to 'look' next.

Help. Thanks. Neal.
 
A Long is an integer, so you will get only integral values for your
variables.

numba and numbb should be DIMmed as Single.
 
Hi Vasant,
Thank you. I don't think I remember reading in the MSO Excel docum re: NOT
being able to get a decimal answer to an 'integer' division.
I also need to apologize, when I extracted the code in a test, I now
remember that I did NOT Dim the vars before running my test, so I guess MSO
dim'd them as variants, and that's why the test worked, but not the code when
it was in the macro.
Again Thanks,
Neal
 
You're welcome, Neal!

--

Vasant

Neal Zimm said:
Hi Vasant,
Thank you. I don't think I remember reading in the MSO Excel docum re: NOT
being able to get a decimal answer to an 'integer' division.
I also need to apologize, when I extracted the code in a test, I now
remember that I did NOT Dim the vars before running my test, so I guess MSO
dim'd them as variants, and that's why the test worked, but not the code when
it was in the macro.
Again Thanks,
Neal
Click to expand...
 
Back
Top