Greenies08
New Member
- Joined
- Apr 4, 2011
- Messages
- 22
Hi, I am not knowledgable in VBA at all. I have found the following that works a treat to time stamp in column J when column K is not equal to nothing. BUT, I want a separate timestamp that will time stamp only when the selection in Column K is specific i.e. "3. Send to Accounts"
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Columns("H:H")) Is Nothing Then
For Each I In Intersect(Target, Columns("H:H"))
If Not IsEmpty(I) Then
I.Offset(0, 2).Value = Now
Else
I.Offset(0, 2).ClearContents
End If
Next I
End If
End Sub
Appreciate anyone's brain power and will give all credibility to you
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Columns("H:H")) Is Nothing Then
For Each I In Intersect(Target, Columns("H:H"))
If Not IsEmpty(I) Then
I.Offset(0, 2).Value = Now
Else
I.Offset(0, 2).ClearContents
End If
Next I
End If
End Sub
Appreciate anyone's brain power and will give all credibility to you
