Evaluate Function isn't Returning Errors

[antman2988]

I'm trying to evaluate the formulas in a table object to check for any errors, and I'm using the Evaluate function to evaluate the formulas and check for any errors. Is there a better or different way of doing this? Thanks!

programErrors = Application.Evaluate("COUNTIF(" & progRng.Address & ",IsError)")

 

[antman2988]

It's missing a closing bracket, try

programErrors = progRng.Worksheet.Evaluate("SUMPRODUCT(--(ISERROR(" & progRng.Address & ")))")

Ohhhhh, that was the issue. I was wondering why the original didn't show the orange text. Thank you, Fluff!

 

[Fluff]

Glad we could help & thanks for the feedback.

 

[RoryA]

Sorry - dangers of air code!

 

[antman2988]

Sorry - dangers of air code!

Seriously. I spent an hour last week trying to figure out an object not defined error caused by a missing parenthesis. Thanks again for the help.