[RESOLVED] Need to delete some worksheets and save others

[RobDog888]

Yes, as I mentioned in my last post. You need to reverse the loop by...

For i = Sheets.Count To 1 Step -1

Ps, Danny, I know you are but others may not.