Based on your answer to Dave's question, I can now see that it wouldn't.
Hopefully, he'll have an answer.

Doug

"Halray" wrote in message
...
Sorry that format has no affect either before or after the write.
--
Ray


"Doug Glancy" wrote:

Halray,

I think that if the cell your setting already has a format it might
cause
what you're seeing, so try setting the format:

With ActiveWorkbook.Worksheets("Dump Area").Cells(RowNumber, 2)
.Value = AreaCounts
.NumberFormat = "#.0000"
End With

hth,

Doug

"Halray" wrote in message
...
Have have a varibale declared as a double, read a number into it from
a
file.
THe variable is indicated with four decimal places when viewed in the
debugger. When I write the variable out to Excel using the following
the
number gets truncated to two decimal places:

With ActiveWorkbook.Worksheets("Dump Area")
.Cells(RowNumber, 2) = AreaCounts

Anyone have any suggestions to fix this problem?

Thanks !



--
Ray