I think the problem is because you are using .selection and therefore activating sheets unnecessarily,and the code is running ahead of the application.
This is the first failure
The fault occurs in Sub FormatArchive
Line
Selection.AutoFormat Format:=xlRangeAutoFormatList2, Number:=True, Font:= _
True, Alignment:=True, Border:=True, Pattern:=True, Width:=True
When you run the debugger the code will run on without any adjustment.
"Fixing" this sub then moves the problem to the next similarly designed sub.
Getting rid of Selection in all instances will almost certainly cure this problem.
Maybe some one else can follow this up, I will look back later and have a go if your problem isn't solved.
Bookmarks