Rodrigo
Mon Mar 17 11:43:01 CDT 2008
This is the rule that i am using. I do not see the Optional ByVal ColOffset
As Long = 1&.
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
With Target
If .Count > 1 Then Exit Sub
If Not Intersect(Range("A2:A10"), .Cells) Is Nothing Then
Application.EnableEvents = False
If IsEmpty(.Value) Then
.Offset(0, 1).ClearContents
Else
With .Offset(0, 1)
.NumberFormat = "dd mmm yyyy hh:mm:ss"
.Value = Now
End With
End If
Application.EnableEvents = True
End If
End With
End Sub
"Gary''s Student" wrote:
> Just change the default value of the offset column variable. For example:
>
> Instead of:
> Optional ByVal ColOffset As Long = 1&, _
> use:
> Optional ByVal ColOffset As Long = 2&, _
>
> --
> Gary''s Student - gsnu200773
>
>
> "Rodrigo" wrote:
>
> > Ok i figured out how to do a time stamp, but know i am trying to format the
> > rule that JE McGimpsey provides in his website. So that the date stamp does
> > not appear in next cell but in another cell. Below is a link with the example
> > of the rule.
> >
> >
http://www.mcgimpsey.com/excel/timestamp.html
> >
> > Thanks