Remove all filters from each sheet, then clear content?

Hi all,

There has to be a better way to remove any/all filters (if any are set) and to clear all cells from worksheets than what I have below:

Please Login or Register  to view this content.

This is pretty basic stuff, I know, but for some reason, this periodically freezes up the application and I have to kill Excel from task manager. I have NO Idea why, or how to make it stop... so, if you have any ideas, would love to read them.

Thanks, as always!