First, Thanks for the quick response. That is a great fix for the "ActiveSheet.ShowAllData" problem.
However, the main problem is that when I select the Save Icon from the file menu it doesn't seem to recognize the existence of the code at all. I was only running into the problem you clear up when I ran the code from the VBA editor. If you can figure why it's not even seeing the commands I will probably use your solution above in place of my coding.