Macro works in one workbook and not another - Run-Time Error 1004

I am extremely new to VBA. I put together the below code to right align numbers and center align text in all sheets of a workbook. I defined the PerfArea.This code works in 3 different workbooks like a charm. In one of them I get the error message "Run-time error '1004' Method 'Range' of object'_Worksheet' failed. I don't think anything is different about this workbook. Any ideas? It looks like the problem line is the first ws.Range line. Thanks in advance.

Please Login or Register  to view this content.

Possibilities:

1) The PerfArea is not defined as you thought
2) The ThisWorkbook references are applying the code to the wrong workbook, perhaps ActiveWorkbook would be better?
3) There are no formulas matching the first SpecialCells test and you have no ON ERROR message above it.

You only need one ON ERROR for that macro, and it should be directly below the For Each... code, the rest are redundant.