Thanks!

I see you changed/added quite a bit from what I had originally but I just changed:

If ws.Index <> 1 Then ws.Select False
to
If ws.Index <> 1 Then ws.Visible = xlVeryHidden
and kept everything else the same and it works perfectly.

Except now I don't understand why it's not selecting the 1st tab, oh well as long as it works I suppose.