Thread: Date
View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Gord Dibben Gord Dibben is offline
external usenet poster
 
Posts: 22,906
Default Date

Randy

You don't specify any particular cells that are "date" cells.

This event code will stick a date into any cell in column E as you Tab into
column E

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error GoTo enditall
Application.EnableEvents = False
If Target.Cells.Column = 5 Then
n = Target.Row
Excel.Range("E" & n).Value = Now
End If
enditall:
Application.EnableEvents = True
End Sub

Can be re-written for an array of cells you Tab to.

This is sheet event code. Right-click on the sheet tab and "View Code".

Copy/paste code into that sheet module.


Gord Dibben MS Excel MVP

On Tue, 17 Jul 2007 19:32:03 -0700, Randy
wrote:

Maybe I wasn't clear.. and when when read my question over I could see how I
may get the wrong answer.. let me attempt to be a little more clear.. When I
pass over a cell.. I mean like <tab through a series of cells and when I go
through a 'date' cell it automatically inserts the current date.. I think
I've been able to do it before.. I know about the CTRL+;.. and about the
TODAY() functions.. maybe this function really isn't possible.. please let me
know