VBA Advanced Filter causing Excel file to corrupt...

In excel, Name Manager, can you have two 'refers to' that refer to the same range? I wonder whether this is the problem with my VBA? Any thoughts?

I think I have fixed my VBA. The line of code :-
Sheet33.Range("a6:r" & LastRow).Name = "_Depreciation"

I changed to:-
Sheet33.Range("a6:r" & LastRow + 1).Name = "_Depreciation"

Still interested to hear your thoughts....