use "Workbook_SheetDeactivate(ByVal Sh As Object)"

Originally Posted by Andy Pope

Code in Thisworkbook module

Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)

    If g_objLastSheet Is Nothing Then Exit Sub

    Set g_objLastSheet = Sh
    
End Sub

Standard code module

Sub MoveBack()

Debug.Print "Before", ActiveSheet.Name, g_objLastSheet.Name
    g_objLastSheet.Activate
Debug.Print "After", ActiveSheet.Name, g_objLastSheet.Name
    
End Sub

No idea how you are using it though

thank you.
when running the Moveback() , I'm getting a runtime error '424' object required..
any ideas?