vba calculations returning 0

[healing]

Hi I am new to VBA.

fff = (Sin(34) / 4000) * 4000

Worksheets("Sheet1").Cells(3, 3).Value = fff

this is giving me a value of 0 in that cell when it should give me 0.529082686. I checked the cell properties to display more decimals, but the result is 0.00000

when i do this calculation in an excel cell and not using vba i get the correct result. What is causing this? i am doing many calculations and they keep returning 0 in the cell

[MarvinP]

Hi healing and welcome to the forum,

Did you Dimension the variable of fff as double or is it an INTEGER?
This seems to work for me:

Please Login or Register  to view this content.

[AlphaFrog]

If fff is declared as Integer or Long, you wouldn't get the decimal value.

This worked for me.

Please Login or Register  to view this content.

Or just this...

Please Login or Register  to view this content.

[healing]

thanks for the help guys, that solved it