Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Enter current time into cell hh:mm:ss
I am trying to create a macro that records the current time off th clock on my computer. I am aware of the short cut (ctrl+shift+;). However, this does not go into the actual seconds. Is there a way t record the seconds as well -- rglasuno ----------------------------------------------------------------------- rglasunow's Profile: http://www.excelforum.com/member.php...nfo&userid=421 View this thread: http://www.excelforum.com/showthread.php?threadid=38213 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Enter current time into cell hh:mm:ss
Good evening rglasunow You would be better off using the =NOW() function, the only problem with this is that it will alter every time the sheet is recalculated. The code below will call the NOW() function, format the cell appropriately and then changes the cell contents from a formula to a value. Sub TimeStamp() ActiveCell.FormulaR1C1 = "=NOW()" With Selection ..NumberFormat = "h:mm:ss;@" ..Formula = .Value End With End Sub HTH DominicB -- dominicb ------------------------------------------------------------------------ dominicb's Profile: http://www.excelforum.com/member.php...o&userid=18932 View this thread: http://www.excelforum.com/showthread...hreadid=382135 |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Enter current time into cell hh:mm:ss
thanks man!! That worked perfect!! -- rglasuno ----------------------------------------------------------------------- rglasunow's Profile: http://www.excelforum.com/member.php...nfo&userid=421 View this thread: http://www.excelforum.com/showthread.php?threadid=38213 |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Enter current time into cell hh:mm:ss
Hi rglasunow Glad to help. Appreciate the feedback. Dominic -- dominic ----------------------------------------------------------------------- dominicb's Profile: http://www.excelforum.com/member.php...fo&userid=1893 View this thread: http://www.excelforum.com/showthread.php?threadid=38213 |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Enter current time into cell hh:mm:ss
Why not do it in one go?
Sub TimeStamp() ActiveCell.Value = Format(Time,"h:mm:ss;@") End Sub -- HTH RP (remove nothere from the email address if mailing direct) "dominicb" wrote in message ... Good evening rglasunow You would be better off using the =NOW() function, the only problem with this is that it will alter every time the sheet is recalculated. The code below will call the NOW() function, format the cell appropriately and then changes the cell contents from a formula to a value. Sub TimeStamp() ActiveCell.FormulaR1C1 = "=NOW()" With Selection NumberFormat = "h:mm:ss;@" Formula = .Value End With End Sub HTH DominicB -- dominicb ------------------------------------------------------------------------ dominicb's Profile: http://www.excelforum.com/member.php...o&userid=18932 View this thread: http://www.excelforum.com/showthread...hreadid=382135 |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Enter current time into cell hh:mm:ss
One way:
Public Sub InsertTime() With ActiveCell .Value = Time .NumberFormat = "hh:mm:ss" End With End Sub In article , rglasunow wrote: I am trying to create a macro that records the current time off the clock on my computer. I am aware of the short cut (ctrl+shift+;). However, this does not go into the actual seconds. Is there a way to record the seconds as well? |
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
Enter current time into cell hh:mm:ss
This really doesn't do exactly what the OP says s/he wanted - since
NOW() returns both the date and the time (though it may be acceptable to the OP). Entering the time using Activecell, but then using Selection for .Formula = .Value is dangerous - if the user has selected multiple cells, it will reformat and wipe out any formulae in that selection. Far better to stick with ActiveCell. Also, if the OP want's both date and time, there's no need to use XL's NOW() function, use VBA's Now method instead: Public Sub TimeStamp() With ActiveCell .Value = Now .NumberFormat = "h:mm:ss" End With End Sub In article , dominicb wrote: Good evening rglasunow You would be better off using the =NOW() function, the only problem with this is that it will alter every time the sheet is recalculated. The code below will call the NOW() function, format the cell appropriately and then changes the cell contents from a formula to a value. Sub TimeStamp() ActiveCell.FormulaR1C1 = "=NOW()" With Selection .NumberFormat = "h:mm:ss;@" .Formula = .Value End With End Sub HTH DominicB |
#8
Posted to microsoft.public.excel.programming
|
|||
|
|||
Enter current time into cell hh:mm:ss
Better:
Public Sub InsertTime() With ActiveCell .NumberFormat = "hh:mm:ss" .Value = Time End With End Sub In article , JE McGimpsey wrote: Public Sub InsertTime() With ActiveCell .Value = Time .NumberFormat = "hh:mm:ss" End With End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
When I hit enter, why is the current cell highlighted? | Excel Discussion (Misc queries) | |||
Enter text automatically based on current time | Excel Discussion (Misc queries) | |||
Can I automatically enter the current date or current time into a | New Users to Excel | |||
enter a current date in a cell? | Excel Discussion (Misc queries) | |||
How to enter current static time in Excel in 00:00:00.0 format? | Excel Worksheet Functions |