How to move a sheet to the end of a workbook using VBA?

To move a sheet to the end of a workbook using VBA, you can use the following code in the Visual Basic for Applications (VBA) editor:

Sub MoveSheetToEnd()
    ' Specify the name of the sheet you want to move
    Dim sheetName As String
    sheetName = "SheetNameHere" ' Replace with your sheet name

    ' Move the sheet to the end of the workbook
    ThisWorkbook.Sheets(sheetName).Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
End Sub
  • Open your Excel workbook.
  • Press `Alt` + `F11` to open the VBA editor.
  • Insert a new module by clicking `Insert` > `Module`.
  • Copy and paste the following VBA code into the module window:
  • Replace `”SheetNameHere”` with the actual name of the sheet you want to move.
  • Close the VBA editor and return to Excel.
  • To run the macro, press `Alt` + `F8`, select `MoveSheetToEnd`, and click `Run`.

This script specifies the sheet you want to move by name and then moves it after the last sheet in the workbook using the `Move` method. Make sure the specified sheet name matches exactly the name in your workbook, including case and spaces.

Unlock Your Potential

Excel

Basic - Advanced

Access

Access Basic - Advanced

Power BI

Power BI Basic - Advanced

Help us grow the project