Đây chỉ là một lý do nho nhỏ trong vô số cái độ điên của file này:
Thứ 1: Name lỗi quá trời. Bạn dùng code này xóa name lỗi nha:
Sub DeleteAllNamesWithREFError()
Dim N As Name
If MsgBox("Are you sure?", vbYesNo + vbDefaultButton2, "Confirm macro") = vbNo Then Exit Sub
For Each N In...