Automatically Add Username, Current Date And Time Each Tiime Any Cell Is Changed
Feb 27, 2009
I am looking to have a macro which will automatically add the username and date to a cell, when the cell above changes (or in this case =x). I have a bit of code from a previous project, but I have changed Target.Row to Target.Column and it is not behaving as I require:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("B2:BZ2"), Target) Is Nothing Then
Range("C" & Target.Column).Value = Format(Date, "dd-mmm") & " " & Format(Time, "hh:mm") & " by " & (Application.UserName)
End If
End Sub
See the attachment for the example. What I need is whenever row 3 ="x" I need the corresponding cell in row "d" to update with the latest date, time and username. Please not the macro is currently not active on the sheet as i've added the ' character.
View 3 Replies
ADVERTISEMENT
Sep 21, 2009
In my spreadsheet, I want a macro to write date and time everytime the user change a cell with a list validation. On the table, the E column contains the status of each row. I want to know since when the status is that.
View 4 Replies
View Related
May 8, 2014
I need to record time next to eg.: W3 cell,
Now I'm using below formula :
=IF(W3<>"",NOW(),"")
but the NOW function keep updating time itself, is there any VBA code or function that I can use with this formula ?
View 4 Replies
View Related
Jun 12, 2007
I would like to have the current time/date automatically entered into B1 when A1>0 and I want it to be non volitile, is this possible?
View 9 Replies
View Related
Jun 22, 2008
i have the following code to insert comments into cells, however if the user cancels the input box (i.e. doesn't insert any text), a comment is still added with their details and the comment 'FALSE'. Is there anyway to stop comments being added if the user cancels the input?
Sub Insert_Comment()
Dim iReply As Integer
Dim cl As Range
Dim sComment As String
Dim sText As String
Dim UserNameWindows As String
View 4 Replies
View Related
Jul 24, 2013
In the spreadsheet attached, i have a formula now() which will update the current time in column B if i select opted from column A and similarly in column D the current time will get updated when i select option in column C.
However when i first select the option in column B the current time gets updated but after a while if i select the option in column C the time in the column B is also getting changed.
May be there is a different formula, Not sure what is the trick ?
Time sheet.xlsx
View 7 Replies
View Related
Oct 20, 2009
What is the code i need to use to assign a macro to a command button which inserts the current date and time in the selected cell regardless of where that cell is?
View 5 Replies
View Related
Aug 21, 2013
I have a spreadsheet where an engineer is expected to record sample temperatures of water outlets, along with the time he took the sample. Each outlet has a row on the spreadsheet with a column for the Temperature and column for the time. I would like to automatically input the current time(or time and date) on each line as the temperature is entered.
View 4 Replies
View Related
Jun 18, 2009
When a cell changes i would like the cell in the next column to record the date of this change. After achieving this i want to set up conditional formatting to compare this date to the current date and if they are the same then change the original cell's colour to show it changed today!
I started using the code below (from ozgrid) which was working fine BUT my cell value in column A is actually taken from a different column. when the different column cell value changes my cell in A changes but the script below does not seem to see this as a change. it only records the date if i physcially change the cell in A rather than another cell prompting it to change.
based on my overall objective and my plans to date please can someone suggest a solution?
current code below....
View 9 Replies
View Related
Oct 22, 2009
I need a mar that I want to attach to a button that would:Add a new comment with the date/time added to the username [format XYZ 22/10/09 14:48] and then I type the comment text, and/or
Append a new comment to the existing comment, in the same format as for 1.
View 7 Replies
View Related
Sep 4, 2006
On opening of an excel document is it possible to have a date in a cell that will continuously update. =now() enters the date required but if i was to go into the sheet days or whatever later is there a way that this will update automatically??
View 3 Replies
View Related
Aug 31, 2009
Trying to create a macro that will add the date & time & initials (i.e 8/26/09 2:34 PM JOD) into the current cell.
I've found plenty of macro's that will do this but it ends up deleting any existing text within the cell. I need to be able to add it in the middle of a text string.
View 10 Replies
View Related
Mar 19, 2009
I am trying to write a formula that will have the cell display todays date if it is after 2:00PM, and if it is before 2:00PM I need the cell to display Today()-1. I have tried several iterations and I'm stumped.
View 5 Replies
View Related
Mar 27, 2008
I would like to be able to track progress of various tasks/occurences by allowing users of a spreadsheet to just click in the appropriate column and in doing so, it would fill in the current time and date. I.E. Column headings would read, "Item Sent to Review", "Item Received From Review", "Item Sent to Specialist", etc. and I want users to be able to double click in a given column to populate with current date/time information,
View 7 Replies
View Related
Mar 11, 2014
I needed a code that would input the current date and time in the cells in column N whenever changes were made to any cells in the row from columns A to M. For example, if I change a name in cell 6D, then cell 6N would automatically change to the current date and time.
I found a useful code on a forum (maybe here, don't know for certain) and modified it to suit my needs (see below). I am however now getting a debugging error suggesting that the second line that reads "Private Sub Worksheet_Calculate()" is causing an error.
View 11 Replies
View Related
Oct 24, 2007
I have a column of values resulting from subtracting a static date and time from the current date and time.
This means it is constantly updating, which makes it impossible to sort.
All my work depends on sorting those values, though.
View 12 Replies
View Related
Oct 24, 2006
There is a column in my spreadsheet which needs to reflect a " percent done".
I used to enter just a numerical value in (eg. 20) to reflect 20% done. My boss wanted it to show as an actual percentage (eg. 20%). I changed the format to Percent, Zero decimal places. Then you had to enter .20 to get the 20% to show.
Now my boss doesn't like that - and wants to be able to enter "20" to get the 20% to show. I put the following code in my SelectionChange event...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'other logic
If Target.Column = Asc(PercentDoneColumn) - 64 Then
If Target.Value <> "" Then
Target.Value = Target.Value / 100
End If
End If
'end other logic
End Sub
My problem is that this works well when putting a new percentage in, but not for when you click on a cell that already has a percentage in it. For example, if you have .2 (displaying "20%" in the cell), and click on that cell, it divides that number by 100, and gives you 0.2%, displaying as "0%". I want to enter a number between 0 and 100, have it displayed and stored as a percent. At this point, I'd settle for the displayed, but would prefer to have it stored as a percent, too.
I also want it to not reset my value unless I'm putting a new value in!
View 4 Replies
View Related
Oct 11, 2009
I want to automatically populate C2 with the most current date from B9:B14.
I can't seem to figure out the formula.
View 3 Replies
View Related
Apr 25, 2009
I have some rather complex formulas that when a value is placed in one of any three cells it solves for the other two, taking values from other places on a worksheet (including the cell itself).
Scenario: Cell F10, G10, and H10 all have formulas in them. If a value is placed in F10 it solves for G10 and H10. If a value is place in G10 it solves for F10 and H10. If a value is placed in H10, it solves for F10 and G10.
I really do not think the actual formulas matters at this time...
Has anyone done this before, using VBA code to place the formulas in cells F10 G10 and H10? Look for a working example of this if possible.
View 9 Replies
View Related
Dec 11, 2011
how to make a date automatically show up in the current year.
For example, if A1 = 6/2/2005, and I want B1 to equal that same month and day, but 2011... How can I do that?
I know =6/2/2005 + 365*6 would work, but the date in A1 will vary... so it has to be a way of showing ANY date with ANY year with the same month/day but current year.
View 2 Replies
View Related
Aug 30, 2007
I've been looking for an easy way to add time to a cell that has a time or date and time in it, for example, 5/31/2007 12:06:27 PM
I want to add 30 minutes to it, for example, without having to split it apart and manually add it in, worrying about adding an hour if I go over 60 minutes, etc.
If I was doing it with a cell formula, I could use "=A1 + TIME(0,30,00)" but I don't know what the equivalent would be in VBA.
View 3 Replies
View Related
Jul 21, 2009
I am very new to vba and trying to figure out an auto save macro that will automatically save my workbook when a certian cell range is changed. Right now I have a macro set that automactially record the time and date of when a change is made to the name cell, I want to set up a macro that will automatically save the file when the time is updated.
This program is used by several users and they have a tendnecy to forget to save the program so that when other people want to check the updated data nothing has changed because the changes have not been saved. I have attached the file that I am working on. When a change is made in column F then Column G automatically updates, now I want column G to trigger autosave. I would also like a msgbox to appear to tell user that file has been saved.
View 3 Replies
View Related
Mar 6, 2014
i got a problem with date range.actually i wanna to insert date range automatically which is referring current week.
View 2 Replies
View Related
Oct 28, 2008
I know that =now() will give me the time, and keep updating itself, but is there a formula I can use that will give me the time the cell was written into and maintain that time .. example, if I entered something into the cell at 3:45:21pm I want that time recorded in that cell and not change as they day moves on
View 9 Replies
View Related
Jun 4, 2009
I'm trying to set up a template running loads of formulas. One of the aspects I want is that a specific field refreshes with the current date, but always reverts to 10:00:00 (10AM) as the time.
View 4 Replies
View Related
Apr 13, 2009
I have the following code pasted into the worksheet module which used to work fine but no longer does. I didn't touch the code, it just stopped working.
Private Sub WorkSheet_Change(ByVal Target As Range)
Select Case Target.Address
Case "$A$16"
Select Case Target
Case "Custom Color 1": Call CustomColorInput1
Case "Custom Color 2": Call CustomColorInput1
Case "Custom Color 3": Call CustomColorInput1
Case "Custom Color 4": Call CustomColorInput1
Case Else:
End Select
Case "$A$17"
Select Case Target
Case "Custom Color 1": Call CustomColorInput2
Case "Custom Color 2": Call CustomColorInput2
Case "Custom Color 3": Call CustomColorInput2
Case "Custom Color 4": Call CustomColorInput2
Case Else:
End Select
Case "$A$18"
CustomColorInput 1-6 are the same except they input data into different cells F16-F21.
When I attach any of the CustomColorInput macros to a button it works fine. When I try to call it from the worksheet module, the data input box pops up but the data doesn't get entered into the cell. When I try to step through the CustomColorInput macros using F8, the input box pops up, I enter data and press ok. Then I continue with F8 and the debugger jumps to a custom function that I entered (below), which is not called for and is in no way related to the code.
Function PullAfterLast(rCell As Range, strLast As String)
PullAfterLast = Mid(rCell, InStrRev(rCell, strLast) + 1, 256)
End Function
When I close VBA, the data that I typed into the data input box is in the correct cell.
So basically, I'm getting three different responses from the offending code depending on how I call it up. Can anyone tell me what's going on?
More generally, in this and previous occasions, I've had problems with macros that cease to work for no reason that is apparent to me. What are some things that would cause a macro to stop working, without actually changing the code (other than the obvious, like referring to names or worksheets etc. that don't exist anymore)?
View 9 Replies
View Related
Mar 7, 2014
I am trying to put this in about 25 cells to point at 25 different files. Basically I am trying to keep an eye on when the files have been updated each morning so that I can then pull off some data from them and who saved it.
I solved the first part (see next post) but I still havent been able to get it a function pull off the username.
View 1 Replies
View Related
Aug 26, 2006
I am trying to create a code so that when the save button is hit, it puts the current date and time into a given cell before it saves. This way I will know the last time something was updated and saved.
View 9 Replies
View Related
Jun 22, 2007
I'm trying to save a file with current date and time...I used the code from the following thread:
Save File Name With Date/time Stamp
ActiveWorkbook.SaveAs Filename:="C:FinalOutput.xls " & _
format(Now(), "mm_dd_yyyy hh mm AMPM"), FileFormat:=xlNormal, Password:="", _
WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False
Now when I try to run the macro, it gives me an error saying: Compile Error, Wrong number of arguments or invalid property assignment. And it highlights "format" in yellow.
View 9 Replies
View Related
Feb 15, 2012
I have a spreadsheet that contains a list of names/numbers/dates and I have to manually go through the list each day highlighting the row if it contains a date that is more than 48 hours old. How to accomplish this in a macro? Example:
Name.......Phone Number:......Ticket Number......Date Added
xxxx........555-555-5555...........5555555............2/12/12
xxxx........444-444-4444...........4444444............2/15/12
xxxx........123-456-7890...........1234567............2/10/12
That is the layout of the spreadsheet so I would have to manually highlight rows 2 and 4 because the date in Column D is greater than 48 hours ago. The range is A1:D25 and the cells are changed/updated daily.
View 5 Replies
View Related