Microsoft Office Forums

Go Back   Microsoft Office Forums > >

Reply
 
Thread Tools Display Modes
  #1  
Old 01-20-2012, 11:25 AM
Catalin.B Catalin.B is offline Return cuurent time when another cell is updated Windows Vista Return cuurent time when another cell is updated Office 2010 32bit
Expert
 
Join Date: May 2011
Location: Iaşi, Romānia
Posts: 386
Catalin.B is on a distinguished road
Default


Glad you found the solution, but i really believe it's wrong...
For 2 reasons: you create a circular reference by refering in the formula to the cell where the formula is placed, and second reason is that if you eliminate the first problem, and you have a value in A1, your formula will put a formula in B1: Now(), formula that will permanently refresh, and you said you need the time when data is entered in A1, not the Now() value..
To insert a permanent date and time value in a cell, can be done with a macro, targeted to A column
Reply With Quote
  #2  
Old 01-20-2012, 11:44 AM
zks zks is offline Return cuurent time when another cell is updated Windows XP Return cuurent time when another cell is updated Office 2003
Novice
Return cuurent time when another cell is updated
 
Join Date: Jan 2012
Posts: 3
zks is on a distinguished road
Smile Circular Formulas

That is correct, but after I'm done and I print the report I dont need this sheet anymore ... BUT for the future use of the sheet, I should probably consider your solution!

I enabled the circular formula with:
tools > options > calculation tab and click the iteration box

Thanks for the all Help!
Reply With Quote
  #3  
Old 01-20-2012, 12:07 PM
Catalin.B Catalin.B is offline Return cuurent time when another cell is updated Windows Vista Return cuurent time when another cell is updated Office 2010 32bit
Expert
 
Join Date: May 2011
Location: Iaşi, Romānia
Posts: 386
Catalin.B is on a distinguished road
Default

This is the way to get a good result
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim RNG As Range, cell
Set RNG = ActiveSheet.Range("A2:A10")
If Not Intersect(Target, RNG) Is Nothing Then
For Each cell In RNG
If Len(cell) > 0 And Not IsEmpty(cell) Then
cell.Offset(0, 1) = Now()
End If
Next cell
End If
End Sub
Attached Files
File Type: xlsm worksheet change.xlsm (18.2 KB, 9 views)
Reply With Quote
  #4  
Old 01-22-2012, 10:24 PM
Catalin.B Catalin.B is offline Return cuurent time when another cell is updated Windows Vista Return cuurent time when another cell is updated Office 2010 32bit
Expert
 
Join Date: May 2011
Location: Iaşi, Romānia
Posts: 386
Catalin.B is on a distinguished road
Default

Made some corrections to work properly:
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim RNG As Range, cell
Set RNG = ActiveSheet.Range("A2:A10")
If Not Intersect(Target, RNG) Is Nothing Then
For Each cell In RNG
If Len(cell) > 0 And IsEmpty(cell.Offset(0, 1)) Then
cell.Offset(0, 1) = Now()
End If
Next cell
End If
End Sub
Reply With Quote
Reply

Thread Tools
Display Modes


Similar Threads
Thread Thread Starter Forum Replies Last Post
Return cuurent time when another cell is updated Cell formatting for time - Excel 2010 PomDave Excel 5 09-05-2011 10:49 PM
Item Already updated simon@resultsoftware.co.u Outlook 0 07-25-2011 04:30 AM
Return cuurent time when another cell is updated How can references be updated automatically? ezthelm Word 2 05-30-2011 03:45 AM
Return cuurent time when another cell is updated Add a period of time to a referenced "Time" cell? derelyth Excel 4 03-27-2011 04:31 PM
Outlook 2002 duplicating updated calendar events RMTony Outlook 0 12-29-2010 11:48 AM

Other Forums: Access Forums

All times are GMT -7. The time now is 07:39 PM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft