freaknyea
06-27-2008, 09:31 AM
Okay, here is what I have...
In Column B, I enter information.
When information is entered into Column B then Column F populates with a date.
What I am having a problem with is the following:
I want,
When F populates with a date then G will populate with a date.
I also want it so that when G populates, then it can no longer be updated and stays exactly the same.
So F can update, but not G. G populates once.
Another issue I have is G will only populate if I manually enter something into F. I would prefer if G populates when F autopopulates.
Thank you.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect([B:B], Target) Is Nothing Then
Application.EnableEvents = False
Cells(Target.Row, 6) = Now
Application.EnableEvents = True
End If
If Not Intersect([F:F], Target) Is Nothing Then
Application.EnableEvents = False
Cells(Target.Row, 7) = Now
Application.EnableEvents = True
End If
End Sub
In Column B, I enter information.
When information is entered into Column B then Column F populates with a date.
What I am having a problem with is the following:
I want,
When F populates with a date then G will populate with a date.
I also want it so that when G populates, then it can no longer be updated and stays exactly the same.
So F can update, but not G. G populates once.
Another issue I have is G will only populate if I manually enter something into F. I would prefer if G populates when F autopopulates.
Thank you.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect([B:B], Target) Is Nothing Then
Application.EnableEvents = False
Cells(Target.Row, 6) = Now
Application.EnableEvents = True
End If
If Not Intersect([F:F], Target) Is Nothing Then
Application.EnableEvents = False
Cells(Target.Row, 7) = Now
Application.EnableEvents = True
End If
End Sub