Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
static date and time
Hello
I have a worksheet and on cell H51 is a dropdown list with the names of the employees. Once the employee selects his/her name from the list I need the date and time (static) to populate in cell J51. thank you so much in advance |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
static date and time
Put the following event macro in the worksheet code area:
Private Sub Worksheet_Change(ByVal Target As Range) Set t = Target Set h = Range("H51") Set j = Range("J51") If Intersect(t, h) Is Nothing Then Exit Sub If h.Value = "" Then Exit Sub Application.EnableEvents = False j.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 - gsnu200829 "Wanna Learn" wrote: Hello I have a worksheet and on cell H51 is a dropdown list with the names of the employees. Once the employee selects his/her name from the list I need the date and time (static) to populate in cell J51. thank you so much in advance |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
static date and time
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo ws_exit: Application.EnableEvents = False If Not Intersect(Target, Me.Range("H51")) Is Nothing Then With Target If .Value < "" Then .Offset(0, 2).Value = Format(Now, ""dd/mm/yyyy hh:mm:ss") End If End With End If ws_exit: Application.EnableEvents = True End Sub Gord Dibben MS Excel MVP On Thu, 29 Jan 2009 08:05:01 -0800, Wanna Learn wrote: Hello I have a worksheet and on cell H51 is a dropdown list with the names of the employees. Once the employee selects his/her name from the list I need the date and time (static) to populate in cell J51. thank you so much in advance |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Static Date & Time in Footer - Excel 2007 | Excel Discussion (Misc queries) | |||
Static Date and Time code problem | Excel Discussion (Misc queries) | |||
how can i set a static date and time in excel | Excel Worksheet Functions | |||
how do I insert the current time (static) and date in a cell? | Excel Discussion (Misc queries) | |||
Excel static current date/time problem | Excel Worksheet Functions |