Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 20
Default Tag a cell with current date

Hi All,

I have data in column B and I would like to find a way to insert the
current date and time in the adyacent cell in column A. This have to
occur at the moment I hit enter in the cell in column B. I thought
using Now() but the date changes when the file is opened again. can
you guide me through something?

Thanks in advance.
  #2   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 11,058
Default Tag a cell with current date

touch
CNTRL-; CNTRL-:
--
Gary''s Student - gsnu2007h


"DDavid" wrote:

Hi All,

I have data in column B and I would like to find a way to insert the
current date and time in the adyacent cell in column A. This have to
occur at the moment I hit enter in the cell in column B. I thought
using Now() but the date changes when the file is opened again. can
you guide me through something?

Thanks in advance.

  #3   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 20
Default Tag a cell with current date

On Apr 17, 8:41 am, Gary''s Student
wrote:
touch
CNTRL-; CNTRL-:
--
Gary''s Student - gsnu2007h

"DDavid" wrote:
Hi All,


I have data in column B and I would like to find a way to insert the
current date and time in the adyacent cell in column A. This have to
occur at the moment I hit enter in the cell in column B. I thought
using Now() but the date changes when the file is opened again. can
you guide me through something?


Thanks in advance.


Is there a Way to do this automaticaly, like using an If function?
ie.: if=(b<0, insert the current date)
  #4   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 11,058
Default Tag a cell with current date

Yes. This a worksheet event macro:

Private Sub Worksheet_Change(ByVal Target As Range)
Set t = Target
Set r = Range("B:B")
If Intersect(t, r) Is Nothing Then Exit Sub
Application.EnableEvents = False
t.Offset(0, -1).Value = Now
Application.EnableEvents = True
End Sub


Because it is worksheet code, it is very easy to install and use:

1. right-click the tab name near the bottom of the window
2. select View Code - this brings up a VBE window
3. paste the stuff in and close the VBE window

If you save the workbook, the macro will be saved with it.

To remove the macro:

1. bring up the VBE windows as above
2. clear the code out
3. close the VBE window

To learn more about macros in general, see:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

To learn more about Event Macros (worksheet code), see:

http://www.mvps.org/dmcritchie/excel/event.htm


--
Gary''s Student - gsnu2007h


"DDavid" wrote:

On Apr 17, 8:41 am, Gary''s Student
wrote:
touch
CNTRL-; CNTRL-:
--
Gary''s Student - gsnu2007h

"DDavid" wrote:
Hi All,


I have data in column B and I would like to find a way to insert the
current date and time in the adyacent cell in column A. This have to
occur at the moment I hit enter in the cell in column B. I thought
using Now() but the date changes when the file is opened again. can
you guide me through something?


Thanks in advance.


Is there a Way to do this automaticaly, like using an If function?
ie.: if=(b<0, insert the current date)

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Date label and current date in same cell Lost in Microbiology Excel Discussion (Misc queries) 1 January 26th 08 02:04 PM
Current date and time when different cell = X Workaholic Excel Worksheet Functions 3 August 13th 06 12:49 AM
current Date and time in cell Alex01 Excel Discussion (Misc queries) 3 February 24th 06 09:22 PM
Show current date in cell Alex01 Excel Discussion (Misc queries) 4 February 24th 06 06:45 PM
enter a current date in a cell? Tpeyton77 Excel Discussion (Misc queries) 2 June 8th 05 02:30 AM


All times are GMT +1. The time now is 04:30 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"