Macro to expand all the filters on the active worksheet.

[Kimston]

Hi everyone. I am trying to combine two pieces of code to expand all the filters on the active worksheet, return active cell to the last unoccupied cell in column A before saving data. I found these two pieces of codes, and I can’t find a way to combine them to make it work. Your help is very appreciating.
Code1

Please Login or Register  to view this content.

Code2

Please Login or Register  to view this content.

[Pete_UK]

If you add data to the bottom of some data which has filters set up, then the filter range will automatically adjust to encompass the new data, so what's your problem?

Pete

[Kimston]

The problem is that when other users use the auto filter, they don't remove it. They only save the changes with auto filter on.