Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel,microsoft.public.excel.programming,microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
I'm trying to build a spreadsheet to log support calls, all i need is a way
of inserting the time & date in a column as soon as data is entered in another column. I have done this using the Now() function but the date & time keep updating, I want them to remain the same as when the first appeared. I have a bit of VB knowledge so am happy to do it this way if required. Any ideas? TIA, MC |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi
See: http://www.mcgimpsey.com/excel/timestamp.html -----Original Message----- I'm trying to build a spreadsheet to log support calls, all i need is a way of inserting the time & date in a column as soon as data is entered in another column. I have done this using the Now() function but the date & time keep updating, I want them to remain the same as when the first appeared. I have a bit of VB knowledge so am happy to do it this way if required. Any ideas? TIA, MC . |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
You basically just need to create the date/time using the now() functio
and then do copy.. paste special.. values. ActiveCell.Formula = "=NOW()" ActiveCell.Copy ActiveCell.PasteSpecial Paste:=xlPasteValue -- Message posted from http://www.ExcelForum.com |
#4
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
At the moment there is a simple function saying if A1 is blank do nothing,
else insert the now() function "incjourn " wrote in message ... You basically just need to create the date/time using the now() function and then do copy.. paste special.. values. ActiveCell.Formula = "=NOW()" ActiveCell.Copy ActiveCell.PasteSpecial Paste:=xlPasteValues --- Message posted from http://www.ExcelForum.com/ |
#5
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi
if you want an automatic solution then you need VBA :-) so try the solutions in the link I provided to you :-) -----Original Message----- At the moment there is a simple function saying if A1 is blank do nothing, else insert the now() function "incjourn " wrote in message ... You basically just need to create the date/time using the now() function and then do copy.. paste special.. values. ActiveCell.Formula = "=NOW()" ActiveCell.Copy ActiveCell.PasteSpecial Paste:=xlPasteValues --- Message posted from http://www.ExcelForum.com/ . |
#6
![]()
Posted to microsoft.public.excel,microsoft.public.excel.programming,microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
From a post I sent to someone yesterday
right click sheet tabview codeinsert this Private Sub Worksheet_Change(ByVal Target As Range) If Target.Row 4 And Target.Column = 3 Or Target.Column = 4 Then Cells(Target.Row, "a") = Date Cells(Target.Row, "b") = Time End If End Sub -- Don Guillett SalesAid Software "MC" wrote in message ... I'm trying to build a spreadsheet to log support calls, all i need is a way of inserting the time & date in a column as soon as data is entered in another column. I have done this using the Now() function but the date & time keep updating, I want them to remain the same as when the first appeared. I have a bit of VB knowledge so am happy to do it this way if required. Any ideas? TIA, MC |
#7
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi Frank,
I'm trying to create a Macro from http://www.mcgimpsey.com/excel/timestamp.html However, whenever I try to run the Macro, the Macro won't appear in my Macro list. Can you help? The module is there, as is the code. I'm using Excel 2003. -- Illustris "Frank Kabel" wrote: Hi if you want an automatic solution then you need VBA :-) so try the solutions in the link I provided to you :-) -----Original Message----- At the moment there is a simple function saying if A1 is blank do nothing, else insert the now() function "incjourn " wrote in message ... You basically just need to create the date/time using the now() function and then do copy.. paste special.. values. ActiveCell.Formula = "=NOW()" ActiveCell.Copy ActiveCell.PasteSpecial Paste:=xlPasteValues --- Message posted from http://www.ExcelForum.com/ . |
#8
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Copy the code from John's page.
Right-click on your sheet tab and "View Code". Paste John's code in there. The code is worksheet event code and does not go into a general module. You do not run it from ToolsMacroMacros. It runs when the data is entered in the Target cell. Gord Dibben Excel MVP On Tue, 20 Jul 2004 13:18:01 -0700, Illustris wrote: Hi Frank, I'm trying to create a Macro from http://www.mcgimpsey.com/excel/timestamp.html However, whenever I try to run the Macro, the Macro won't appear in my Macro list. Can you help? The module is there, as is the code. I'm using Excel 2003. |
#9
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I used Don's code - worked a treat, thanks!
"Don Guillett" wrote in message ... Then you might want to take a look at the simpler one I posted a few days ago. right click sheet tabview codeinsert this Private Sub Worksheet_Change(ByVal Target As Range) If Target.Row 4 And Target.Column = 3 Or Target.Column = 4 Then Cells(Target.Row, "a") = Date Cells(Target.Row, "b") = Time End If End Sub -- Don Guillett SalesAid Software "Illustris" wrote in message ... Hi Frank, I'm trying to create a Macro from http://www.mcgimpsey.com/excel/timestamp.html However, whenever I try to run the Macro, the Macro won't appear in my Macro list. Can you help? The module is there, as is the code. I'm using Excel 2003. -- Illustris "Frank Kabel" wrote: Hi if you want an automatic solution then you need VBA :-) so try the solutions in the link I provided to you :-) -----Original Message----- At the moment there is a simple function saying if A1 is blank do nothing, else insert the now() function "incjourn " wrote in message ... You basically just need to create the date/time using the now() function and then do copy.. paste special.. values. ActiveCell.Formula = "=NOW()" ActiveCell.Copy ActiveCell.PasteSpecial Paste:=xlPasteValues --- Message posted from http://www.ExcelForum.com/ . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Time entry auto changes to date and then time ? | Excel Worksheet Functions | |||
Auto Date & Time | Excel Worksheet Functions | |||
Auto column insertion based on a number | Excel Worksheet Functions | |||
Auto row insertion based on a number | Excel Worksheet Functions | |||
Auto insert date/time | Excel Worksheet Functions |