move the second worksheet to end of workbook

 
Sub SimpleWorksheetMovement() 
    ThisWorkbook.Worksheets(2).Move after:=ThisWorkbook.Worksheets(ThisWorkbook.Worksheets.Count) 
End Sub

1.	Do... Loop Until Loops with Worksheets
2.	Looping Through Worksheets in a Workbook
3.	performs a simple bubble sort to sort the worksheets in the workbook
4.	For...Next Loop with Worksheet
5.	The Sheets Collection
6.	Grouping Worksheets
7.	Dynamic Arrays for worksheet name
8.	Use for loop to loop through all worksheets
9.	Sort all worksheets

move the second worksheet to end of workbook : Worksheets « Excel « VBA / Excel / Access / Word