Dates and comments
Hi,
And for option 2 try this. Once again consider some error trapping by
checking if there's a date in column D for example
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("F:F")) Is Nothing Then
Range("F2") = DateAdd("D", 14, Target.Offset(, -2).Value)
End If
End Sub
Mike
"Jock" wrote:
When a date is placed in any cell D, I would like either:
1) a comment to automatically be accociated to cell F on the same row with a
date displayed which will be the date from D + 14, OR
2) When the cell in F has focus, the date (D + 14) appears in a pre
determined cell at the top of the page, F2 for instance.
Any ideas?
--
Traa Dy Liooar
Jock
|