Subtotals

[AlexCS]

Hi all,

Does anyone know how to prevent the VBA subtotal function from rounding results? Here's a tiny bit of my code

Dim Var1 As Long
Var1 = Evaluate("Subtotal(109,H:H)")

If Var1 = 0 Then...

My problem is Excel executes the intructions in the if body even if Var1 is 0.49 while what I need is exactly 0.

Any help would be appreciated!

Many thanks,

Alex

 

[VoG]

Try

Dim Var1 As Double

 

[AlexCS]

Works perfectly ..thanks a lot!