Worksheet_Activate () - Need to work when any worksheet is activated

Hi All,

I have this code sitting in Sheet2 of my workbook:

Private Sub Worksheet_Activate()

Application.ScreenUpdating = False

Range("B:B").ClearContents

For i = 1 To Sheets.Count
        Cells(i, 2) = Sheets(i).Name
    Next i
Application.ScreenUpdating = False

End Sub

The code kicks in when I activate sheet2 (that is where I want the code to work), but what I need is for the code to update sheet2 whenever any of my worksheets are activated. Help...?

JM