Controlling the order of Tabs

[gheyman]

I have a Template where on occasion people have the need to add new tabs. But I want any new tables that are created always to be after the standard tabs that come with the template. Is there a way , using VBA to always put my standard Template Tabs upfront what the workbook opens (Automatically reorder the tabs - visually)? Example Sheet1, Sheet2, Sheet3... Should always be the first three tabs shown at the bottom of the workbook. Thanks for the help.

PS I don't always know what the user will name new tabs that they create and add to the workbook. I only know the names of the one in the template and the associate Sheet number.

 

[Fluff]

How about

Private Sub Workbook_Open()
   Dim i As Long
   Dim Ary As Variant
   
   Ary = Array("Sheet1", "Sheet2", "Sheet3")
   For i = 0 To UBound(Ary)
      Sheets(Ary(i)).Move Sheets(i + 1)
   Next i
End Sub