SpecialCells.Copy when none to copy

[rz6657]

I have a macro that filters data by certain criteria. Once the data is filtered, the data will than be copied and pasted to a different sheet. However, in the event that no data is filtered as it didn't match the criteria, I get an error in the copy code below as it states "No cells were found" Run-time-error '1004'

Code:

'Copy data to CR Table
Sheets("EAS Dump").Range("H3:H4000").SpecialCells(12).Copy


Is there a way that it will not error out and do nothing when there is no data...?

Thanks

[kev_]

This will step over it and carry on as if the error was not there:

Please Login or Register  to view this content.

This will end the sub-routine:

Please Login or Register  to view this content.

This allows you to step over some other code or to tell VBA what to do in the event of an error:

Please Login or Register  to view this content.

[AlphaFrog]

Please Login or Register  to view this content.

[rz6657]

Thanks to all for a quick reply... the ErrHandling option worked best for my situation...

[kev_]

Glad it helped.
Don't forget to reset Error
Thanks for rep and for marking thread as solved