PI in VBA code

[jjokol]

What is the correct way for PI to be used in VBA code? In the code below, I get an error message saying PI is zero:

Range("D" & topRow + 1).Offset(2, 2).Value = (count / Pi) * Range("D" & topRow + 1).Value

I've declared PI as an integer. What am I doing wrong?

 

[Tom Urtis]

Without knowing any of the context of what you are doing, declare your Pi variable as Double, not as Integer. Pi is an infinite decimalized number so no matter what you do, the result will be rounded after the 15th decimal place, but a Double type will at least be better than an Integer type.

 

[jjokol]

Thanks Tom but I'm still getting an error message for Pi - even after I've declared it as Double. The error message is number 11 - 'Division by Zero' and Pi is the offender. Its value is zero.

Surely I don't have to specify Pi's value (3.14.....) to Excel?

 

[Tom Urtis]

Well, again, you only showed one code line from what must be a larger endeavor, but if you did not variablize Pi and you are referring it in your code as Pi with the intention of Excel interpreting it as Pi, then instead of
Pi
expand it to
WorksheetFunction.Pi
where you have it in your code.

Example, try substituting
(count / Pi)
with
(count / WorksheetFunction.Pi)

 

[jjokol]

Many thanks, Tom. All sorted.