View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Lars-Åke Aspelin[_2_] Lars-Åke Aspelin[_2_] is offline
external usenet poster
 
Posts: 913
Default Input Question Help

On Sat, 19 Jul 2008 22:43:35 -0700 (PDT), James8309
wrote:

Hi everyone,

I was wondering if there is any function or VBA coding out there allow
me to do this.

Each time I type something into each cell in Range("B2:B100") it will
display the time it was entered in (hh:mm)

e.g.

when I type "ABC" in B2 at 3:40pm it will display 3:40pm or 15:40 in
cell A2. When I type in "DEF" or any entry at B3 at 4:00pm it will
display 4:00pm or 16:00 in Cell A3.

Is this possible?

Please help

Thanks alot



Try putting this procedure into the worksheet:

Private Sub Worksheet_Change(ByVal Target As Range)
Set myrange = ActiveSheet.Range("B2:B100")
If Not Intersect(Target, myrange) Is Nothing Then
Target.Offset(0,-1) = Time()
End Sub

Hope this helps / Lars-Åke