close

Hello,

I would like to be able to have the following happen. If Part # cell is
blank then Completed Date is blank, but if a value is entered into the part #
cell I would like to have the current date appear in the Completed Date cell,
and to stay that date. Currently once midnight comes the date changes.

Sample chart:
Part #Request DateCompleted Date

1234 April 23/06

Thanks


Hey,
try this change event macro in the sheet module:
-----------------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Select Case Target.Column
Case 2
If Target.Offset(0, -1).Value gt; quot;quot; Then
Target.Offset(0, 1).Value = Format(Now(),
quot;mm/dd/yyyyquot;)
Else
Target.Offset(0, 1).Value = quot;quot;
End If

End Select
End Sub
----------------------------------------
Ben--
protonLeah
------------------------------------------------------------------------
protonLeah's Profile: www.excelforum.com/member.php...oamp;userid=32097
View this thread: www.excelforum.com/showthread...hreadid=535390

全站熱搜
創作者介紹
創作者 software 的頭像
software

software

software 發表在 痞客邦 留言(0) 人氣()