Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Move the second worksheet to end of workbook

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