View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.worksheet.functions
tungsten222000 tungsten222000 is offline
external usenet poster
 
Posts: 2
Default Excel - Lock date in multiple cells

Dear Carim,
That worked really well, thankyou. I had to adjust the offset a little
to cope with some merged cells but after that it worked well.
Thanks for your help.
Lindsay
Carim wrote:
Hi Lindsay,

With an event macro stored into the sheet module :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$8" Or Target.Address = "$D$10" _
Or Target.Address = "$L$6" Or Target.Address = "$L$8" Then
Target.Offset(0, 4) = Now
Else
Exit Sub
End If
End Sub


HTH
Cheers
Carim