"Worksheet" "Change" using VB

R

Richard

I am trying to run some code (post date & time) on a worksheet evert time
any data changes in the sheet. I used the code below

Private Sub Worksheet_Change(ByVal Target As Range)

Worksheets("2008").Range("M7").FormulaR1C1 = "=TODAY()"

' Worksheets("2008").Range("N7").FormulaR1C1 = "=NOW()"

End Sub

I tried TODAY and NOW they both work when the sheet changes. However they
also activate every time I open the sheet. Just opening the sheet posts the
current date and time. I only want the last time data changed on the sheet to
change the time. Note I am not using the WORKSHEET OPEN or ACTIVATE
dropdown box I am using WORKSHEET CHANGE option. Please advise
Thanks
 
F

FSt1

hi
now() and today() are volital. use date and time instead
range("A1") = Date
range("A2") = Time
Range("A3") = Date & " " & Time

play with the formats.

Regards
FSt1
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Excel Already selected values from DropDown list dynamically updating on multiple sheets 10
VBA Excel - Select a value from one cell in Excel to update a SQL table 1
Worksheet Change Recognize 0
Excel VBA - Problem with Closing Print Preview 0
Automatic Record Transfer 2
disable brian baulsom's worksheet change based on cell value. 2
Excel VBA to go to specific sheet & cell in the current workbook not working. 2
Excel How to run multiple Private Sub Worksheet_Change(ByVal Target As Range) 0

Top