MS Outlook VBA problem

[jslmvl]

Hi,

In MS Outlook VBA, I wrote some code into
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
and it was working fine.
However, today, I found it cannot be fired anymore when send emails.
What may cause such problem?

Thank you in advance.