Solved: Sheet Calculate Event Not Working

[zoom38]

I'm trying to activate the "Private Sub Worksheet_Calculate()" on a specific sheet from a module. I have the following code in a module and it is not activating the calculate event on the worksheet. Can anyone advise what I am doing wrong?

[VBA]
Application.ScreenUpdating = True
Sheets("Both Platoons").Calculate
Application.ScreenUpdating = False
[/VBA]

Thanks
Gary

[zoom38]

Disreguard this post, I had EnableEvents set to false. The following did it.

[VBA]
Application.EnableEvents = True
Application.ScreenUpdating = True
Sheets("Both Platoons").Calculate
Application.ScreenUpdating = False
Application.EnableEvents = False
[/VBA]

Thanks
Gary