.value = .value doesnt work

[jfish1288]

I am having an issue with this code

.Range("D9").Value = .Range("I7").Value

Cell I7 is $0.03261. When I run the code it pust $0.03000 in D9. Any thoughts of what is going on or how to put the correct value in D9 other than copy/paste?

Also if I run this code

MsgBox .Range("I7").Value

It returns the value .0326

 

[Tom Urtis]

Maybe it is a formatting issue, example

MsgBox format(.Range("I7").Value, ".00000")

 

[jfish1288]

I am getting the following compile error:

"Wrong number of arguments or invalid property assignment"

I get the same error when I copy and past the example code from Microsoft Visual Basic Help "Format Function" topic

 

[jfish1288]

Im using excel 2002 by the way

 

[Tom Urtis]

You should post more of your code, or more description.

You do have the With and End With statements in there somewhere, don't you? Example, in cell I7 of Sheet5 just now, I entered a long decimalized number.

I activated sheet2, then I ran this short macro, with the code line I posted earlier, inside the With structure which is a given but I mention it anyway, and had no problem:

Sub test()
With Sheets("Sheet5")
MsgBox Format(.Range("I7").Value, ".00000")
End With
End Sub

 

[RoryA]

Use:

.Range("D9").Value2 = .Range("I7").Value2

 

[jfish1288]

Thanks rorya, value2 did the trick