The following should help

Private Sub Worksheet_Deactivate()
Dim s As Worksheet
Set s = ActiveSheet
'do your stuff here
s.Activate
End Sub

If any of your complex updating involves selecting sheet1 (or the sheet which
triggers this deactivate code) you could have a loop problem. Otherwise this
should put you on the sheet you selected which triggered the deactivation of
the sheet.

Good luck.

Ken
Norfolk, Va

ps Merry Christmas