moving multiple worksheets so that the current one is to the left

[anna1964]

I have over 50 worksheets tabs that I would like to organize with the current one at the left and all the previous ones in order. How can I move multiple tabs instead of one at a time.

 

[My Aswer Is This]

Do you mean active one at far left of Tab Bar.

And you said:

and all the previous ones in order

Do you mean all the other ones. And what does in order mean.

In order by what?​

 

[Newbienew]

Do you mean like holding the CTRL button and selecting individual sheets with the mouse and moving them around? Or holding the Shift key and selecting a group and moving them around with the mouse?
This is what I did for the 30 plus sheets for organizing. I am assume this is what you mean.

 

[My Aswer Is This]

This Vba script will move the active sheet to The far left position on the Sheet Tab.
Making it Sheet(1)

Sub Move_Me()
'Modified 4/11/2019 10:54:44 PM  EDT
ActiveSheet.Move Before:=Sheets(1)
End Sub