В VBA Editor в Excel (Alt + F11) перейдите в раздел ThisWorkbook проекта. В раскрывающемся меню слева выберите «Рабочая книга». В раскрывающемся меню выберите «BeforeClose».
Любой код, который вы здесь введете, произойдет после того, как пользователь решит выйти из листа, но до того, как он действительно закроется. В этом месте введите следующий код, подставив название вашего листа:
Worksheets("Sheet1").Activate
Ваш последний саб должен выглядеть так:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Worksheets("Sheet1").Activate
End Sub