View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Kelly P[_2_] Kelly P[_2_] is offline
external usenet poster
 
Posts: 10
Default Change the date when there is a change in another cell

Figured it out...thanks guys

"Kelly P" wrote:

How would I get it to change throughout the whole sheet? What I have is a
list of products, I want a corresponding cell to automatically put in the
current date when the price field gets changed. Such as when A24 is changed
B24 puts in todays date.

"Jim Thomlinson" wrote:

Here is some code for you to try. It must be placed in the sheet you want to
react to the change. Right click the sheet tab and select view code... add
the following

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1")) Is Nothing Then
Application.EnableEvents = False
Range("B1").Value = Now()
Application.EnableEvents = True
End If
End Sub

If Cell A1 is changed then the current date (and time) is added to cell B1.
You can format the cell to not show the time.
--
HTH...

Jim Thomlinson


"Kelly P" wrote:

I have an excel spreadsheet that I would like to have the date changed to the
current date when another cell value is changed. Is this possible?