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 quot;freezequot;, 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(quot;Dquot; amp; Target.Row) = Date
End If
End Sub
If you need more help on how to make an event procedure, please post!
Regards,
Stefi
?H NEWS??ezt ?rta:
gt; I have a long sample list, (names and telephone no.), once a name and number
gt; are used an outcome code is entered in the end cell like so,
gt; Column A Column B Column C Column D
gt; Name Number Outcome
gt;
gt; What I would like to do is have the time automatically entered in column D
gt; once there is an entry in column C and for the time to quot;freezequot;, no matter
gt; what other calculations take place.
gt;
gt;
gt;
Yes, please could I have more help on how to make a event procedure. Should
I be entering that in the Visual Basic?quot;Stefiquot; gt; wrote in message
...
gt; You can solve this with a Change event as follows:
gt;
gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; If Target.Column = 3 Then
gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; End If
gt; End Sub
gt;
gt; If you need more help on how to make an event procedure, please post!
gt;
gt; Regards,
gt; Stefi
gt;
gt; quot;PH NEWSquot; ezt 甏ta:
gt;
gt; gt; I have a long sample list, (names and telephone no.), once a name and
number
gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; Column A Column B Column C Column D
gt; gt; Name Number Outcome
gt; gt;
gt; gt; What I would like to do is have the time automatically entered in column
D
gt; gt; once there is an entry in column C and for the time to quot;freezequot;, no
matter
gt; gt; what other calculations take place.
gt; gt;
gt; gt;
gt; gt;
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(quot;Dquot; amp; Target.Row) = Date
End If
lines between lines
Private Sub Worksheet_Change(ByVal Target As Range)
End Sub
Hope it's clear!
Regards,
Stefi
?H NEWS??ezt ?rta:
gt; Yes, please could I have more help on how to make a event procedure. Should
gt; I be entering that in the Visual Basic?
gt;
gt;
gt; quot;Stefiquot; gt; wrote in message
gt; ...
gt; gt; You can solve this with a Change event as follows:
gt; gt;
gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; If Target.Column = 3 Then
gt; gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; gt; End If
gt; gt; End Sub
gt; gt;
gt; gt; If you need more help on how to make an event procedure, please post!
gt; gt;
gt; gt; Regards,
gt; gt; Stefi
gt; gt;
gt; gt; quot;PH NEWSquot; ezt ?rta:
gt; gt;
gt; gt; gt; I have a long sample list, (names and telephone no.), once a name and
gt; number
gt; gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; gt; Column A Column B Column C Column D
gt; gt; gt; Name Number Outcome
gt; gt; gt;
gt; gt; gt; What I would like to do is have the time automatically entered in column
gt; D
gt; gt; gt; once there is an entry in column C and for the time to quot;freezequot;, no
gt; matter
gt; gt; gt; what other calculations take place.
gt; gt; gt;
gt; gt; gt;
gt; gt; gt;
gt;
gt;
gt;
Thank you very very much, that's fantastic.
stevenL
quot;Stefiquot; gt; wrote in message
news
gt; Yes, you have to use Visual Basic:
gt;
gt; Alt-F11 (brings up VB)
gt; Right-click on Sheet1 in Project window (left side of the screen)
gt; Click on View code in local menu
gt; Click on left-side drop-down list . Choose Worksheet
gt; Click on right-side drop-down list . Choose Change
gt; Copy
gt; If Target.Column = 3 Then
gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; End If
gt; lines between lines
gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt;
gt; End Sub
gt;
gt; Hope it's clear!
gt; Regards,
gt; Stefi
gt;
gt; quot;PH NEWSquot; ezt 甏ta:
gt;
gt; gt; Yes, please could I have more help on how to make a event procedure.
Should
gt; gt; I be entering that in the Visual Basic?
gt; gt;
gt; gt;
gt; gt; quot;Stefiquot; gt; wrote in message
gt; gt; ...
gt; gt; gt; You can solve this with a Change event as follows:
gt; gt; gt;
gt; gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; gt; If Target.Column = 3 Then
gt; gt; gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; gt; gt; End If
gt; gt; gt; End Sub
gt; gt; gt;
gt; gt; gt; If you need more help on how to make an event procedure, please post!
gt; gt; gt;
gt; gt; gt; Regards,
gt; gt; gt; Stefi
gt; gt; gt;
gt; gt; gt; quot;PH NEWSquot; ezt 甏ta:
gt; gt; gt;
gt; gt; gt; gt; I have a long sample list, (names and telephone no.), once a name
and
gt; gt; number
gt; gt; gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; gt; gt; Column A Column B Column C Column D
gt; gt; gt; gt; Name Number Outcome
gt; gt; gt; gt;
gt; gt; gt; gt; What I would like to do is have the time automatically entered in
column
gt; gt; D
gt; gt; gt; gt; once there is an entry in column C and for the time to quot;freezequot;, no
gt; gt; matter
gt; gt; gt; gt; what other calculations take place.
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt;
gt; gt;
gt; gt;
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?quot;PH NEWSquot; gt; wrote in message
...
gt; Yes, please could I have more help on how to make a event procedure.
Should
gt; I be entering that in the Visual Basic?
gt;
gt;
gt; quot;Stefiquot; gt; wrote in message
gt; ...
gt; gt; You can solve this with a Change event as follows:
gt; gt;
gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; If Target.Column = 3 Then
gt; gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; gt; End If
gt; gt; End Sub
gt; gt;
gt; gt; If you need more help on how to make an event procedure, please post!
gt; gt;
gt; gt; Regards,
gt; gt; Stefi
gt; gt;
gt; gt; quot;PH NEWSquot; ezt 甏ta:
gt; gt;
gt; gt; gt; I have a long sample list, (names and telephone no.), once a name and
gt; number
gt; gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; gt; Column A Column B Column C Column D
gt; gt; gt; Name Number Outcome
gt; gt; gt;
gt; gt; gt; What I would like to do is have the time automatically entered in
column
gt; D
gt; gt; gt; once there is an entry in column C and for the time to quot;freezequot;, no
gt; matter
gt; gt; gt; what other calculations take place.
gt; gt; gt;
gt; gt; gt;
gt; gt; gt;
gt;
gt;
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 quot;Column C is
blank therefore column D is also blank!quot;?
Stefi?H NEWS??ezt ?rta:
gt; That was and is fantastic, but could you help me further. Is it possible to
gt; add something to that entry in VB which states that if C is blank D will be
gt; blank?
gt;
gt;
gt; quot;PH NEWSquot; gt; wrote in message
gt; ...
gt; gt; Yes, please could I have more help on how to make a event procedure.
gt; Should
gt; gt; I be entering that in the Visual Basic?
gt; gt;
gt; gt;
gt; gt; quot;Stefiquot; gt; wrote in message
gt; gt; ...
gt; gt; gt; You can solve this with a Change event as follows:
gt; gt; gt;
gt; gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; gt; If Target.Column = 3 Then
gt; gt; gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; gt; gt; End If
gt; gt; gt; End Sub
gt; gt; gt;
gt; gt; gt; If you need more help on how to make an event procedure, please post!
gt; gt; gt;
gt; gt; gt; Regards,
gt; gt; gt; Stefi
gt; gt; gt;
gt; gt; gt; quot;PH NEWSquot; ezt ?rta:
gt; gt; gt;
gt; gt; gt; gt; I have a long sample list, (names and telephone no.), once a name and
gt; gt; number
gt; gt; gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; gt; gt; Column A Column B Column C Column D
gt; gt; gt; gt; Name Number Outcome
gt; gt; gt; gt;
gt; gt; gt; gt; What I would like to do is have the time automatically entered in
gt; column
gt; gt; D
gt; gt; gt; gt; once there is an entry in column C and for the time to quot;freezequot;, no
gt; gt; matter
gt; gt; gt; gt; what other calculations take place.
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt;
gt; gt;
gt;
gt;
gt;
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?
quot;Stefiquot; gt; wrote in message
...
gt; I don't understand your request clearly! If you leave column C blank,
column
gt; D also remains blank. Do you want a text in column D saying quot;Column C is
gt; blank therefore column D is also blank!quot;?
gt;
gt; Stefi
gt;
gt;
gt; quot;PH NEWSquot; ezt 甏ta:
gt;
gt; gt; That was and is fantastic, but could you help me further. Is it possible
to
gt; gt; add something to that entry in VB which states that if C is blank D will
be
gt; gt; blank?
gt; gt;
gt; gt;
gt; gt; quot;PH NEWSquot; gt; wrote in message
gt; gt; ...
gt; gt; gt; Yes, please could I have more help on how to make a event procedure.
gt; gt; Should
gt; gt; gt; I be entering that in the Visual Basic?
gt; gt; gt;
gt; gt; gt;
gt; gt; gt; quot;Stefiquot; gt; wrote in message
gt; gt; gt; ...
gt; gt; gt; gt; You can solve this with a Change event as follows:
gt; gt; gt; gt;
gt; gt; gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; gt; gt; If Target.Column = 3 Then
gt; gt; gt; gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; gt; gt; gt; End If
gt; gt; gt; gt; End Sub
gt; gt; gt; gt;
gt; gt; gt; gt; If you need more help on how to make an event procedure, please
post!
gt; gt; gt; gt;
gt; gt; gt; gt; Regards,
gt; gt; gt; gt; Stefi
gt; gt; gt; gt;
gt; gt; gt; gt; quot;PH NEWSquot; ezt 甏ta:
gt; gt; gt; gt;
gt; gt; gt; gt; gt; I have a long sample list, (names and telephone no.), once a name
and
gt; gt; gt; number
gt; gt; gt; gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; gt; gt; gt; Column A Column B Column C Column D
gt; gt; gt; gt; gt; Name Number Outcome
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; What I would like to do is have the time automatically entered in
gt; gt; column
gt; gt; gt; D
gt; gt; gt; gt; gt; once there is an entry in column C and for the time to quot;freezequot;,
no
gt; gt; gt; matter
gt; gt; gt; gt; gt; what other calculations take place.
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt;
gt; gt; gt;
gt; gt; gt;
gt; gt;
gt; gt;
gt; gt;
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Range(quot;Dquot; amp; Target.Row) = IIf(Target.Value = quot;quot;, quot;quot;, Date)
End If
End SubRegards,
Stefi
?H NEWS??ezt ?rta:
gt; Sorry about that. What I mean is once I've made an entry in column C the
gt; time appears in column D, which is exactly what I wanted, however when the
gt; entry in column C is deleted I would like column D to be blank. Is there a
gt; way of doing that?
gt; quot;Stefiquot; gt; wrote in message
gt; ...
gt; gt; I don't understand your request clearly! If you leave column C blank,
gt; column
gt; gt; D also remains blank. Do you want a text in column D saying quot;Column C is
gt; gt; blank therefore column D is also blank!quot;?
gt; gt;
gt; gt; Stefi
gt; gt;
gt; gt;
gt; gt; quot;PH NEWSquot; ezt ?rta:
gt; gt;
gt; gt; gt; That was and is fantastic, but could you help me further. Is it possible
gt; to
gt; gt; gt; add something to that entry in VB which states that if C is blank D will
gt; be
gt; gt; gt; blank?
gt; gt; gt;
gt; gt; gt;
gt; gt; gt; quot;PH NEWSquot; gt; wrote in message
gt; gt; gt; ...
gt; gt; gt; gt; Yes, please could I have more help on how to make a event procedure.
gt; gt; gt; Should
gt; gt; gt; gt; I be entering that in the Visual Basic?
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt; quot;Stefiquot; gt; wrote in message
gt; gt; gt; gt; ...
gt; gt; gt; gt; gt; You can solve this with a Change event as follows:
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; gt; gt; gt; If Target.Column = 3 Then
gt; gt; gt; gt; gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; gt; gt; gt; gt; End If
gt; gt; gt; gt; gt; End Sub
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; If you need more help on how to make an event procedure, please
gt; post!
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; Regards,
gt; gt; gt; gt; gt; Stefi
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; quot;PH NEWSquot; ezt ?rta:
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; I have a long sample list, (names and telephone no.), once a name
gt; and
gt; gt; gt; gt; number
gt; gt; gt; gt; gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; gt; gt; gt; gt; Column A Column B Column C Column D
gt; gt; gt; gt; gt; gt; Name Number Outcome
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; What I would like to do is have the time automatically entered in
gt; gt; gt; column
gt; gt; gt; gt; D
gt; gt; gt; gt; gt; gt; once there is an entry in column C and for the time to quot;freezequot;,
gt; no
gt; gt; gt; gt; matter
gt; gt; gt; gt; gt; gt; what other calculations take place.
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt;
gt; gt; gt;
gt; gt; gt;
gt;
gt;
gt;
B - E - A - Utiful. Thank you very much for your help
quot;Stefiquot; gt; wrote in message
...
gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; If Target.Column = 3 Then
gt; Range(quot;Dquot; amp; Target.Row) = IIf(Target.Value = quot;quot;, quot;quot;, Date)
gt; End If
gt; End Sub
gt;
gt;
gt; Regards,
gt; Stefi
gt;
gt; quot;PH NEWSquot; ezt 甏ta:
gt;
gt; gt; Sorry about that. What I mean is once I've made an entry in column C the
gt; gt; time appears in column D, which is exactly what I wanted, however when
the
gt; gt; entry in column C is deleted I would like column D to be blank. Is there
a
gt; gt; way of doing that?
gt; gt; quot;Stefiquot; gt; wrote in message
gt; gt; ...
gt; gt; gt; I don't understand your request clearly! If you leave column C blank,
gt; gt; column
gt; gt; gt; D also remains blank. Do you want a text in column D saying quot;Column C
is
gt; gt; gt; blank therefore column D is also blank!quot;?
gt; gt; gt;
gt; gt; gt; Stefi
gt; gt; gt;
gt; gt; gt;
gt; gt; gt; quot;PH NEWSquot; ezt 甏ta:
gt; gt; gt;
gt; gt; gt; gt; That was and is fantastic, but could you help me further. Is it
possible
gt; gt; to
gt; gt; gt; gt; add something to that entry in VB which states that if C is blank D
will
gt; gt; be
gt; gt; gt; gt; blank?
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt; quot;PH NEWSquot; gt; wrote in message
gt; gt; gt; gt; ...
gt; gt; gt; gt; gt; Yes, please could I have more help on how to make a event
procedure.
gt; gt; gt; gt; Should
gt; gt; gt; gt; gt; I be entering that in the Visual Basic?
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; quot;Stefiquot; gt; wrote in message
gt; gt; gt; gt; gt; ...
gt; gt; gt; gt; gt; gt; You can solve this with a Change event as follows:
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; gt; gt; gt; gt; If Target.Column = 3 Then
gt; gt; gt; gt; gt; gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; gt; gt; gt; gt; gt; End If
gt; gt; gt; gt; gt; gt; End Sub
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; If you need more help on how to make an event procedure, please
gt; gt; post!
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; Regards,
gt; gt; gt; gt; gt; gt; Stefi
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; quot;PH NEWSquot; ezt 甏ta:
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; gt; I have a long sample list, (names and telephone no.), once a
name
gt; gt; and
gt; gt; gt; gt; gt; number
gt; gt; gt; gt; gt; gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; gt; gt; gt; gt; gt; Column A Column B Column C Column D
gt; gt; gt; gt; gt; gt; gt; Name Number Outcome
gt; gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; gt; What I would like to do is have the time automatically entered
in
gt; gt; gt; gt; column
gt; gt; gt; gt; gt; D
gt; gt; gt; gt; gt; gt; gt; once there is an entry in column C and for the time to
quot;freezequot;,
gt; gt; no
gt; gt; gt; gt; gt; matter
gt; gt; gt; gt; gt; gt; gt; what other calculations take place.
gt; gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt;
gt; gt;
gt; gt;
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 quot;freezequot;, 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(quot;Dquot; amp; Target.Row) = Date
End If
End Sub
If you need more help on how to make an event procedure, please post!
Regards,
Stefi
?H NEWS??ezt ?rta:
gt; I have a long sample list, (names and telephone no.), once a name and number
gt; are used an outcome code is entered in the end cell like so,
gt; Column A Column B Column C Column D
gt; Name Number Outcome
gt;
gt; What I would like to do is have the time automatically entered in column D
gt; once there is an entry in column C and for the time to quot;freezequot;, no matter
gt; what other calculations take place.
gt;
gt;
gt;
Yes, please could I have more help on how to make a event procedure. Should
I be entering that in the Visual Basic?quot;Stefiquot; gt; wrote in message
...
gt; You can solve this with a Change event as follows:
gt;
gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; If Target.Column = 3 Then
gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; End If
gt; End Sub
gt;
gt; If you need more help on how to make an event procedure, please post!
gt;
gt; Regards,
gt; Stefi
gt;
gt; quot;PH NEWSquot; ezt 甏ta:
gt;
gt; gt; I have a long sample list, (names and telephone no.), once a name and
number
gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; Column A Column B Column C Column D
gt; gt; Name Number Outcome
gt; gt;
gt; gt; What I would like to do is have the time automatically entered in column
D
gt; gt; once there is an entry in column C and for the time to quot;freezequot;, no
matter
gt; gt; what other calculations take place.
gt; gt;
gt; gt;
gt; gt;
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(quot;Dquot; amp; Target.Row) = Date
End If
lines between lines
Private Sub Worksheet_Change(ByVal Target As Range)
End Sub
Hope it's clear!
Regards,
Stefi
?H NEWS??ezt ?rta:
gt; Yes, please could I have more help on how to make a event procedure. Should
gt; I be entering that in the Visual Basic?
gt;
gt;
gt; quot;Stefiquot; gt; wrote in message
gt; ...
gt; gt; You can solve this with a Change event as follows:
gt; gt;
gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; If Target.Column = 3 Then
gt; gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; gt; End If
gt; gt; End Sub
gt; gt;
gt; gt; If you need more help on how to make an event procedure, please post!
gt; gt;
gt; gt; Regards,
gt; gt; Stefi
gt; gt;
gt; gt; quot;PH NEWSquot; ezt ?rta:
gt; gt;
gt; gt; gt; I have a long sample list, (names and telephone no.), once a name and
gt; number
gt; gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; gt; Column A Column B Column C Column D
gt; gt; gt; Name Number Outcome
gt; gt; gt;
gt; gt; gt; What I would like to do is have the time automatically entered in column
gt; D
gt; gt; gt; once there is an entry in column C and for the time to quot;freezequot;, no
gt; matter
gt; gt; gt; what other calculations take place.
gt; gt; gt;
gt; gt; gt;
gt; gt; gt;
gt;
gt;
gt;
Thank you very very much, that's fantastic.
stevenL
quot;Stefiquot; gt; wrote in message
news
gt; Yes, you have to use Visual Basic:
gt;
gt; Alt-F11 (brings up VB)
gt; Right-click on Sheet1 in Project window (left side of the screen)
gt; Click on View code in local menu
gt; Click on left-side drop-down list . Choose Worksheet
gt; Click on right-side drop-down list . Choose Change
gt; Copy
gt; If Target.Column = 3 Then
gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; End If
gt; lines between lines
gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt;
gt; End Sub
gt;
gt; Hope it's clear!
gt; Regards,
gt; Stefi
gt;
gt; quot;PH NEWSquot; ezt 甏ta:
gt;
gt; gt; Yes, please could I have more help on how to make a event procedure.
Should
gt; gt; I be entering that in the Visual Basic?
gt; gt;
gt; gt;
gt; gt; quot;Stefiquot; gt; wrote in message
gt; gt; ...
gt; gt; gt; You can solve this with a Change event as follows:
gt; gt; gt;
gt; gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; gt; If Target.Column = 3 Then
gt; gt; gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; gt; gt; End If
gt; gt; gt; End Sub
gt; gt; gt;
gt; gt; gt; If you need more help on how to make an event procedure, please post!
gt; gt; gt;
gt; gt; gt; Regards,
gt; gt; gt; Stefi
gt; gt; gt;
gt; gt; gt; quot;PH NEWSquot; ezt 甏ta:
gt; gt; gt;
gt; gt; gt; gt; I have a long sample list, (names and telephone no.), once a name
and
gt; gt; number
gt; gt; gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; gt; gt; Column A Column B Column C Column D
gt; gt; gt; gt; Name Number Outcome
gt; gt; gt; gt;
gt; gt; gt; gt; What I would like to do is have the time automatically entered in
column
gt; gt; D
gt; gt; gt; gt; once there is an entry in column C and for the time to quot;freezequot;, no
gt; gt; matter
gt; gt; gt; gt; what other calculations take place.
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt;
gt; gt;
gt; gt;
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?quot;PH NEWSquot; gt; wrote in message
...
gt; Yes, please could I have more help on how to make a event procedure.
Should
gt; I be entering that in the Visual Basic?
gt;
gt;
gt; quot;Stefiquot; gt; wrote in message
gt; ...
gt; gt; You can solve this with a Change event as follows:
gt; gt;
gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; If Target.Column = 3 Then
gt; gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; gt; End If
gt; gt; End Sub
gt; gt;
gt; gt; If you need more help on how to make an event procedure, please post!
gt; gt;
gt; gt; Regards,
gt; gt; Stefi
gt; gt;
gt; gt; quot;PH NEWSquot; ezt 甏ta:
gt; gt;
gt; gt; gt; I have a long sample list, (names and telephone no.), once a name and
gt; number
gt; gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; gt; Column A Column B Column C Column D
gt; gt; gt; Name Number Outcome
gt; gt; gt;
gt; gt; gt; What I would like to do is have the time automatically entered in
column
gt; D
gt; gt; gt; once there is an entry in column C and for the time to quot;freezequot;, no
gt; matter
gt; gt; gt; what other calculations take place.
gt; gt; gt;
gt; gt; gt;
gt; gt; gt;
gt;
gt;
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 quot;Column C is
blank therefore column D is also blank!quot;?
Stefi?H NEWS??ezt ?rta:
gt; That was and is fantastic, but could you help me further. Is it possible to
gt; add something to that entry in VB which states that if C is blank D will be
gt; blank?
gt;
gt;
gt; quot;PH NEWSquot; gt; wrote in message
gt; ...
gt; gt; Yes, please could I have more help on how to make a event procedure.
gt; Should
gt; gt; I be entering that in the Visual Basic?
gt; gt;
gt; gt;
gt; gt; quot;Stefiquot; gt; wrote in message
gt; gt; ...
gt; gt; gt; You can solve this with a Change event as follows:
gt; gt; gt;
gt; gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; gt; If Target.Column = 3 Then
gt; gt; gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; gt; gt; End If
gt; gt; gt; End Sub
gt; gt; gt;
gt; gt; gt; If you need more help on how to make an event procedure, please post!
gt; gt; gt;
gt; gt; gt; Regards,
gt; gt; gt; Stefi
gt; gt; gt;
gt; gt; gt; quot;PH NEWSquot; ezt ?rta:
gt; gt; gt;
gt; gt; gt; gt; I have a long sample list, (names and telephone no.), once a name and
gt; gt; number
gt; gt; gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; gt; gt; Column A Column B Column C Column D
gt; gt; gt; gt; Name Number Outcome
gt; gt; gt; gt;
gt; gt; gt; gt; What I would like to do is have the time automatically entered in
gt; column
gt; gt; D
gt; gt; gt; gt; once there is an entry in column C and for the time to quot;freezequot;, no
gt; gt; matter
gt; gt; gt; gt; what other calculations take place.
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt;
gt; gt;
gt;
gt;
gt;
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?
quot;Stefiquot; gt; wrote in message
...
gt; I don't understand your request clearly! If you leave column C blank,
column
gt; D also remains blank. Do you want a text in column D saying quot;Column C is
gt; blank therefore column D is also blank!quot;?
gt;
gt; Stefi
gt;
gt;
gt; quot;PH NEWSquot; ezt 甏ta:
gt;
gt; gt; That was and is fantastic, but could you help me further. Is it possible
to
gt; gt; add something to that entry in VB which states that if C is blank D will
be
gt; gt; blank?
gt; gt;
gt; gt;
gt; gt; quot;PH NEWSquot; gt; wrote in message
gt; gt; ...
gt; gt; gt; Yes, please could I have more help on how to make a event procedure.
gt; gt; Should
gt; gt; gt; I be entering that in the Visual Basic?
gt; gt; gt;
gt; gt; gt;
gt; gt; gt; quot;Stefiquot; gt; wrote in message
gt; gt; gt; ...
gt; gt; gt; gt; You can solve this with a Change event as follows:
gt; gt; gt; gt;
gt; gt; gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; gt; gt; If Target.Column = 3 Then
gt; gt; gt; gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; gt; gt; gt; End If
gt; gt; gt; gt; End Sub
gt; gt; gt; gt;
gt; gt; gt; gt; If you need more help on how to make an event procedure, please
post!
gt; gt; gt; gt;
gt; gt; gt; gt; Regards,
gt; gt; gt; gt; Stefi
gt; gt; gt; gt;
gt; gt; gt; gt; quot;PH NEWSquot; ezt 甏ta:
gt; gt; gt; gt;
gt; gt; gt; gt; gt; I have a long sample list, (names and telephone no.), once a name
and
gt; gt; gt; number
gt; gt; gt; gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; gt; gt; gt; Column A Column B Column C Column D
gt; gt; gt; gt; gt; Name Number Outcome
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; What I would like to do is have the time automatically entered in
gt; gt; column
gt; gt; gt; D
gt; gt; gt; gt; gt; once there is an entry in column C and for the time to quot;freezequot;,
no
gt; gt; gt; matter
gt; gt; gt; gt; gt; what other calculations take place.
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt;
gt; gt; gt;
gt; gt; gt;
gt; gt;
gt; gt;
gt; gt;
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Range(quot;Dquot; amp; Target.Row) = IIf(Target.Value = quot;quot;, quot;quot;, Date)
End If
End SubRegards,
Stefi
?H NEWS??ezt ?rta:
gt; Sorry about that. What I mean is once I've made an entry in column C the
gt; time appears in column D, which is exactly what I wanted, however when the
gt; entry in column C is deleted I would like column D to be blank. Is there a
gt; way of doing that?
gt; quot;Stefiquot; gt; wrote in message
gt; ...
gt; gt; I don't understand your request clearly! If you leave column C blank,
gt; column
gt; gt; D also remains blank. Do you want a text in column D saying quot;Column C is
gt; gt; blank therefore column D is also blank!quot;?
gt; gt;
gt; gt; Stefi
gt; gt;
gt; gt;
gt; gt; quot;PH NEWSquot; ezt ?rta:
gt; gt;
gt; gt; gt; That was and is fantastic, but could you help me further. Is it possible
gt; to
gt; gt; gt; add something to that entry in VB which states that if C is blank D will
gt; be
gt; gt; gt; blank?
gt; gt; gt;
gt; gt; gt;
gt; gt; gt; quot;PH NEWSquot; gt; wrote in message
gt; gt; gt; ...
gt; gt; gt; gt; Yes, please could I have more help on how to make a event procedure.
gt; gt; gt; Should
gt; gt; gt; gt; I be entering that in the Visual Basic?
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt; quot;Stefiquot; gt; wrote in message
gt; gt; gt; gt; ...
gt; gt; gt; gt; gt; You can solve this with a Change event as follows:
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; gt; gt; gt; If Target.Column = 3 Then
gt; gt; gt; gt; gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; gt; gt; gt; gt; End If
gt; gt; gt; gt; gt; End Sub
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; If you need more help on how to make an event procedure, please
gt; post!
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; Regards,
gt; gt; gt; gt; gt; Stefi
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; quot;PH NEWSquot; ezt ?rta:
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; I have a long sample list, (names and telephone no.), once a name
gt; and
gt; gt; gt; gt; number
gt; gt; gt; gt; gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; gt; gt; gt; gt; Column A Column B Column C Column D
gt; gt; gt; gt; gt; gt; Name Number Outcome
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; What I would like to do is have the time automatically entered in
gt; gt; gt; column
gt; gt; gt; gt; D
gt; gt; gt; gt; gt; gt; once there is an entry in column C and for the time to quot;freezequot;,
gt; no
gt; gt; gt; gt; matter
gt; gt; gt; gt; gt; gt; what other calculations take place.
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt;
gt; gt; gt;
gt; gt; gt;
gt;
gt;
gt;
B - E - A - Utiful. Thank you very much for your help
quot;Stefiquot; gt; wrote in message
...
gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; If Target.Column = 3 Then
gt; Range(quot;Dquot; amp; Target.Row) = IIf(Target.Value = quot;quot;, quot;quot;, Date)
gt; End If
gt; End Sub
gt;
gt;
gt; Regards,
gt; Stefi
gt;
gt; quot;PH NEWSquot; ezt 甏ta:
gt;
gt; gt; Sorry about that. What I mean is once I've made an entry in column C the
gt; gt; time appears in column D, which is exactly what I wanted, however when
the
gt; gt; entry in column C is deleted I would like column D to be blank. Is there
a
gt; gt; way of doing that?
gt; gt; quot;Stefiquot; gt; wrote in message
gt; gt; ...
gt; gt; gt; I don't understand your request clearly! If you leave column C blank,
gt; gt; column
gt; gt; gt; D also remains blank. Do you want a text in column D saying quot;Column C
is
gt; gt; gt; blank therefore column D is also blank!quot;?
gt; gt; gt;
gt; gt; gt; Stefi
gt; gt; gt;
gt; gt; gt;
gt; gt; gt; quot;PH NEWSquot; ezt 甏ta:
gt; gt; gt;
gt; gt; gt; gt; That was and is fantastic, but could you help me further. Is it
possible
gt; gt; to
gt; gt; gt; gt; add something to that entry in VB which states that if C is blank D
will
gt; gt; be
gt; gt; gt; gt; blank?
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt; quot;PH NEWSquot; gt; wrote in message
gt; gt; gt; gt; ...
gt; gt; gt; gt; gt; Yes, please could I have more help on how to make a event
procedure.
gt; gt; gt; gt; Should
gt; gt; gt; gt; gt; I be entering that in the Visual Basic?
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; quot;Stefiquot; gt; wrote in message
gt; gt; gt; gt; gt; ...
gt; gt; gt; gt; gt; gt; You can solve this with a Change event as follows:
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; gt; gt; gt; gt; If Target.Column = 3 Then
gt; gt; gt; gt; gt; gt; Range(quot;Dquot; amp; Target.Row) = Date
gt; gt; gt; gt; gt; gt; End If
gt; gt; gt; gt; gt; gt; End Sub
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; If you need more help on how to make an event procedure, please
gt; gt; post!
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; Regards,
gt; gt; gt; gt; gt; gt; Stefi
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; quot;PH NEWSquot; ezt 甏ta:
gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; gt; I have a long sample list, (names and telephone no.), once a
name
gt; gt; and
gt; gt; gt; gt; gt; number
gt; gt; gt; gt; gt; gt; gt; are used an outcome code is entered in the end cell like so,
gt; gt; gt; gt; gt; gt; gt; Column A Column B Column C Column D
gt; gt; gt; gt; gt; gt; gt; Name Number Outcome
gt; gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; gt; What I would like to do is have the time automatically entered
in
gt; gt; gt; gt; column
gt; gt; gt; gt; gt; D
gt; gt; gt; gt; gt; gt; gt; once there is an entry in column C and for the time to
quot;freezequot;,
gt; gt; no
gt; gt; gt; gt; gt; matter
gt; gt; gt; gt; gt; gt; gt; what other calculations take place.
gt; gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt;
gt; gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt;
gt; gt;
gt; gt;
