Hi im using T = Evaluate("COUNTIF(g15:g27," & """ & " < " & 6 &
"""")") to count how many values are smaller than 6. There are 9 such
values that are smaller, but this formula returns false. Any Ideas. Im
need to use this in vba. Ican get the correct answer in the worksheet
using the formula.
Regards Robert

Sorry, think Ive got it.
T = Application.WorksheetFunction.CountIf(Range("g15:g27"), "<6").
Regards Robert

ok T = Application.WorksheetFunction.CountIf(Range("g15:g27"), "<6")
works, any ideas how i can use a variable in place of "<6". Ive tried T
= Application.WorksheetFunction.CountIf(Range("g15:g27"), < point), but
get an error. Also I want to replace the range with selected cells.
T = Application.WorksheetFunction.CountIf(Active.cells,< point).
Regards Robert

T = Application.CountIf(Range("G15:G27"), "<" & myVar)

T= Application.CountIf(Selection, "<" & myVar)

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"RobcPettit" <(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
> ok T = Application.WorksheetFunction.CountIf(Range("g15:g27"), "<6")
> works, any ideas how i can use a variable in place of "<6". Ive tried T
> = Application.WorksheetFunction.CountIf(Range("g15:g27"), < point), but
> get an error. Also I want to replace the range with selected cells.
> T = Application.WorksheetFunction.CountIf(Active.cells,< point).
> Regards Robert
>