I have a long sample list, (names and telephone no.), once a name and number
are used an outcome code is entered in the end cell like so,
Column A Column B Column C Column D
Name Number Outcome

What I would like to do is have the time automatically entered in column D
once there is an entry in column C and for the time to "freeze", no matter
what other calculations take place.

You can solve this with a Change event as follows:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Range("D" & Target.Row) = Date
End If
End Sub

If you need more help on how to make an event procedure, please post!

Regards,
Stefi

€žPH NEWS€� ezt Ã*rta:

I have a long sample list, (names and telephone no.), once a name and number
are used an outcome code is entered in the end cell like so,
Column A Column B Column C Column D
Name Number Outcome

What I would like to do is have the time automatically entered in column D
once there is an entry in column C and for the time to "freeze", no matter
what other calculations take place.

Yes, please could I have more help on how to make a event procedure. Should
I be entering that in the Visual Basic?


"Stefi" wrote in message
...
You can solve this with a Change event as follows:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Range("D" & Target.Row) = Date
End If
End Sub

If you need more help on how to make an event procedure, please post!

Regards,
Stefi

"PH NEWS" ezt írta:

I have a long sample list, (names and telephone no.), once a name and
number
are used an outcome code is entered in the end cell like so,
Column A Column B Column C Column D
Name Number Outcome

What I would like to do is have the time automatically entered in column
D
once there is an entry in column C and for the time to "freeze", no
matter
what other calculations take place.

Yes, you have to use Visual Basic:

Alt-F11 (brings up VB)
Right-click on Sheet1 in Project window (left side of the screen)
Click on View code in local menu
Click on left-side drop-down list . Choose Worksheet
Click on right-side drop-down list . Choose Change
Copy
If Target.Column = 3 Then
Range("D" & Target.Row) = Date
End If
lines between lines
Private Sub Worksheet_Change(ByVal Target As Range)

End Sub

Hope it's clear!
Regards,
Stefi

€žPH NEWS€� ezt Ã*rta:

Yes, please could I have more help on how to make a event procedure. Should
I be entering that in the Visual Basic?


"Stefi" wrote in message
...
You can solve this with a Change event as follows:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Range("D" & Target.Row) = Date
End If
End Sub

If you need more help on how to make an event procedure, please post!

Regards,
Stefi

"PH NEWS" ezt Ã*rta:

I have a long sample list, (names and telephone no.), once a name and
number
are used an outcome code is entered in the end cell like so,
Column A Column B Column C Column D
Name Number Outcome

What I would like to do is have the time automatically entered in column
D
once there is an entry in column C and for the time to "freeze", no
matter
what other calculations take place.

Thank you very very much, that's fantastic.

stevenL

"Stefi" wrote in message
...
Yes, you have to use Visual Basic:

Alt-F11 (brings up VB)
Right-click on Sheet1 in Project window (left side of the screen)
Click on View code in local menu
Click on left-side drop-down list . Choose Worksheet
Click on right-side drop-down list . Choose Change
Copy
If Target.Column = 3 Then
Range("D" & Target.Row) = Date
End If
lines between lines
Private Sub Worksheet_Change(ByVal Target As Range)

End Sub

Hope it's clear!
Regards,
Stefi

"PH NEWS" ezt írta:

Yes, please could I have more help on how to make a event procedure.
Should
I be entering that in the Visual Basic?


"Stefi" wrote in message
...
You can solve this with a Change event as follows:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Range("D" & Target.Row) = Date
End If
End Sub

If you need more help on how to make an event procedure, please post!

Regards,
Stefi

"PH NEWS" ezt írta:

I have a long sample list, (names and telephone no.), once a name
and
number
are used an outcome code is entered in the end cell like so,
Column A Column B Column C Column D
Name Number Outcome

What I would like to do is have the time automatically entered in
column
D
once there is an entry in column C and for the time to "freeze", no
matter
what other calculations take place.

That was and is fantastic, but could you help me further. Is it possible to
add something to that entry in VB which states that if C is blank D will be
blank?


"PH NEWS" wrote in message
...
Yes, please could I have more help on how to make a event procedure.
Should
I be entering that in the Visual Basic?


"Stefi" wrote in message
...
You can solve this with a Change event as follows:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Range("D" & Target.Row) = Date
End If
End Sub

If you need more help on how to make an event procedure, please post!

Regards,
Stefi

"PH NEWS" ezt írta:

I have a long sample list, (names and telephone no.), once a name and
number
are used an outcome code is entered in the end cell like so,
Column A Column B Column C Column D
Name Number Outcome

What I would like to do is have the time automatically entered in
column
D
once there is an entry in column C and for the time to "freeze", no
matter
what other calculations take place.

I don't understand your request clearly! If you leave column C blank, column
D also remains blank. Do you want a text in column D saying "Column C is
blank therefore column D is also blank!"?

Stefi


€žPH NEWS€� ezt Ã*rta:

That was and is fantastic, but could you help me further. Is it possible to
add something to that entry in VB which states that if C is blank D will be
blank?


"PH NEWS" wrote in message
...
Yes, please could I have more help on how to make a event procedure.
Should
I be entering that in the Visual Basic?


"Stefi" wrote in message
...
You can solve this with a Change event as follows:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Range("D" & Target.Row) = Date
End If
End Sub

If you need more help on how to make an event procedure, please post!

Regards,
Stefi

"PH NEWS" ezt Ã*rta:

I have a long sample list, (names and telephone no.), once a name and
number
are used an outcome code is entered in the end cell like so,
Column A Column B Column C Column D
Name Number Outcome

What I would like to do is have the time automatically entered in
column
D
once there is an entry in column C and for the time to "freeze", no
matter
what other calculations take place.

Sorry about that. What I mean is once I've made an entry in column C the
time appears in column D, which is exactly what I wanted, however when the
entry in column C is deleted I would like column D to be blank. Is there a
way of doing that?
"Stefi" wrote in message
...
I don't understand your request clearly! If you leave column C blank,
column
D also remains blank. Do you want a text in column D saying "Column C is
blank therefore column D is also blank!"?

Stefi


"PH NEWS" ezt írta:

That was and is fantastic, but could you help me further. Is it possible
to
add something to that entry in VB which states that if C is blank D will
be
blank?


"PH NEWS" wrote in message
...
Yes, please could I have more help on how to make a event procedure.
Should
I be entering that in the Visual Basic?


"Stefi" wrote in message
...
You can solve this with a Change event as follows:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Range("D" & Target.Row) = Date
End If
End Sub

If you need more help on how to make an event procedure, please
post!

Regards,
Stefi

"PH NEWS" ezt írta:

I have a long sample list, (names and telephone no.), once a name
and
number
are used an outcome code is entered in the end cell like so,
Column A Column B Column C Column D
Name Number Outcome

What I would like to do is have the time automatically entered in
column
D
once there is an entry in column C and for the time to "freeze",
no
matter
what other calculations take place.