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
|