Could anybody help me

I wish to include a Worksheet_Change event on a
spreadsheet, so that I can record when the value in a cell
is changed.

I can do this physically by: right clicking on the
worksheet tab, selecting the View code option and then
adding the following code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Columns("M:M")) Is Nothing Then
Target.Offset(, 1).Value = Date
End If
End Sub

My query is how do I automate the setting up of this event
from a VB macro that creates the Excel worksheet? I wish
to do this to ensure certain functionality and formatting
is included in the worksheet when it is created.

Many thanks for any Help you can give me.

Nigel