I have a spreadsheet (obviously), I want to click a check box and have it date stamp with text, in the next available cell... if you know what i mean! I have attached a screenshot of what i have (the check boxes) and what i need (the writing in blue).
How can I add a date stamp that will populate a field when text is entered into another cell but will not change every time I re-open the sheet. I have been using =if(B4="",NOW()) which changes each time though and as soon as text is entered it disappears. I want to capture the actual date that someone enters text into a cell and save that date in another cell???
I have a spreadsheet in which a check box fills the corresponding cell with the value "TRUE" if checked and "False" if unchecked. I use this check box for several functions (e.g. assigning a unique ID number). One of the functions I would like to make is a time and date stamp in another column when a user checks a box.
I have perused some of the past topics on this subject and there are a few hiccups in the other fixes.
1. I can't simply set the iterations to one because this sheet also is used to calculate expenditures, fund balances, etc. I need the calculations to be ongoing.
2. I currently have a check box macro that placed a check box on a thousand rows. It may require more rows later on. I need a solution that sets up a time stamp for all of these rows, not just a macro for one row at a time.
3. I need the time stamp to be static. I need to know when entries were made. I cannot use track changes, because we will be using this data to measure the effectiveness of our process. I need to be able to add and subtract the time between the timestamps.
If a1,a21,a41 have a value greater than 0, I wish to stamp cell b1,b21,b41 and so on with todays date, but without the stamped value changing/advancing tomorrow. At the moment cells b1,b21,b41 are copied down as follows. =if(a1>0,TODAY(),"") This works fine, but the date stamp of course changes tomorrow. I can not apply code to the whole b column as cells b2:b20, b22:40 etc have other non-date format data to which the code does not need to apply - the todays date value cell occurs every 20 cells.
I would like to take this VBA a step further. What I want to achieve is to date & time stamp a worksheet in cell A1 if any other cell within the sheet is altered. Below is the VBA I used today to enter the info if cell A1 is changed. Can anyone please help with my new target.
Just one more question: When a shared file is used is it possible to also enter the username of the person who's made the alteration.
Private Sub Worksheet_Change(ByVal Target As Range) Dim rng As Range ' Only look at single cell changes If Target.Count > 1 Then Exit Sub ' Set Target Range Set rng = Range("A1") ' Only look at that range If Intersect(Target, rng) Is Nothing Then Exit Sub ' Action if Condition(s) are met Target.Offset(, 1) = Format(Date, "d mmm yyyy") & " " & Format(Time, "h:mm") & " Hrs"
I am struggeling to adapt this code to what I need. As is, it simply puts a date stamp into cell AJ2 when anything is changed in A2-AJ2. While this code works great I have been attempting to apply it to the rest of the columns in the work book with out having to list each of the rows and cells in the code.
Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, [A2:AI2]) Is Nothing Then [AJ2] = Date End If End Sub
(this is obviously the code that runs correctly)
Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, [A2:AI2-A10000:AI10000]) Is Nothing Then [AJ2-AJ10000] = Date
End If End Sub
(this is one of many unsuccesfull attempts to alter it)
I found the code below in a previous tread, it works great, but i need some help altering it. I have it set-up when someone puts their initials in column B the time and date inputs in column S. But it also inputs if I hit delete or clear contents when I need to clear the form. Is there a way to make it input the time and date ONLY when letters are entered in column B?
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 2 Then Application.EnableEvents = False Target.Offset(0, 17).Value = Now
I've got a sheet with lots of columns. Each time someone makes a change in any row of any one of those columns, I want it to date stamp it in an extra column on the end so we always know who made the last change to each row and when. The actual entering of the data isn't a problem, the problem I'm having is getting it to always put the data stamp in the right column or row.
I am trying to automatically capture and record the date of a cell's last change in value (date stamp). I have an item price list and if a particular cell gets updated I want to automatically record the date of change of that cell. I realize that after I change cell A1 I could tab to cell B1 and enter Ctrl+; but if I have a hundred new prices to enter I don't want to do that (plus me or the data entry person might forget).....
I copied the code that was used to inserting the date when the cell next to it was updated, the original post can be found here: [URL]
The Code below will check a range of cells between c3 and c20 and if I make a change to the value in any of them, then the cell to the right of them will have the date inserted. I've had to modify the original code from the other post a little bit to stop an error appearing when I insert a new Row:
[Code] ....
On the first example that was posted it all ran ok until until I attempted to insert a new Row, then it would put the date into about 5 of the cells to the right of where it should do and I received an error message with the usual Debug stuff on it. It would also delete my column descriptions that I had on Row 2.
Would it be possible for it to not auto insert the date on any new blank row that I insert?
What would be the correct range for me to get the code to work on c3:infinity....
Is it also only possible to enable macro's and code like this in the current document instead of every document that you load through excel.
I want to create a command button on one worksheet so that when I click it a pop up box asks the user for the date and this date is input automatically into a specified cell on another worksheet.
I have got this far - which makes my data input box pop up but now I need adding in code to put that data in a certain cell - for example Cell B1 in worksheet Daily Tasks.
Private Sub CommandButton12_Click()
Dim ans As String ans = InputBox("Enter date dd/mm/yy", "Data Entry")
I am having a very difficult time making this work, if there is anyone who can assist me, I would greatly appreciate the assistance. You can see below what I am trying to do. The entries between the last cells H,3 & K,3 just contain data that is not affected by the rest of the sheet functions.
Cell one (A,3) has a drop down menu for vehicle status. (B,3) vehicle number (C,3) Drop down vehicle type. (D,3) is for dept. (E,3) Date/Time stamp auto generated from (A,3) entry. (Vehicle Status) (F,3) is POC. (G,3) Phone/email. (H,3) Date & Time stamp out of shop. (This cell will recieve the date & Time Stamp from entry of work done in (K,3)
Hi All, I want to set up a macro that will input a date stamp for the working day before this one. I have to input the status of dozens of meeting rooms everyday and the checksheets that I work from are from the previous working day (So on a Monday, I want the Macro to enter Friday's date). I wanted to create a quick macro to save myself the hassle of entering the date for every entry and obviously, if I incorporate the TODAY() function it will update every time I open the workbook and give me the wrong date.
I've been checking related threads and can't seem to find either a VB code or a function that'll enable me to do this (I haven't looked particularly hard as I'm at work ).
Found this macro in a differant thread for a date stamp in A1. I changed it to C38. Also I have it in the workbook module. It is supposed to update the date stamp on save. I think if the data has been changed or not.
I am trying to find a way for an automatic date stamp to be populated into a field in a row when any other cell contained within the same row is changed or modified. I am hoping that there is an easy solution to this. I have tried searching for this and found a few related posts but I don't know how to modify the code to work for me and when I try to do it, it doesn't work. I have attached an example. I would like column B to populate when I modify any field in the row with the date it is being modified.
Looking for code that auto updates today's date in column C, when cells in either column a or b of the same row are edited or changed. I have never used VBA before, just browsing forums for something that might work. I think I'm close with this one, but maybe the offset is wrong - it populates the date in column b when a change.
I have a task list that requires my staff to initial after said task is complete. I want them to initial column "C" Rows 12 thru 94 with the date auto stamping on column "D", same row numbers. Additionally, initials are also required in column "F" same rows as above and auto date in column "G". Am I wanting the imposible here??? I specifically want this only for rows 12 thru 94 because I do not want the time and date stamp in the "daily back up section."
I'm producing a new spreadsheet to track issues and thier completion. I've used the code I have on another spreadsheet, that I got off this site, thanks. What I would like to change are the following:
1) The status column (F) uses a drop down list, located in cells Z1 to Z5. When an option is selected, the date updates in column G automatically. What I would like is for the date to only update in column G if the drop down list is changed to Completed.
2) If the status is changed to completed by mistake, and then changed back I would like the date to disappear.
Finally, can I make the date columns jump automatically so the person entering the data goes from column F to column H.
I have a userform that completes various functions and updates cells when a single button is clicked. Can I add code to the the end to enable a cell to be updated with the time and date, say cell A1 for example? Also is it possible to have the (Windows) username in another cell (all users will be unique) so it will save Jo Bloggs for example? I know this is possible as a Worksheet function:
Is it possible to use a macro like the one below, and have the second location save with the date / time stamp in the name? This is what I need to accomplish: I have a few folks that need to make changes to a master spreadsheet daily. The spreadsheet is in a Network share that when modified and saved, will save to that network share, but also locally. Can the second location have the date/time stamp added to the name of the file so that I know when the changes were made and have an audit trail ? This will also keep a copy of the last modified file in case the spreadsheet is corrupted. Here is what I have for saving to 2 locations:
I'm trying to develop a simple time / acitivity capture sheet for a time and motions study. I have a sheet called "Front" with a project number in C2, an activity drop down in C4 and a comments section in C6.
I need to paste these into sheet "Database" into the first blank cell in B:B for C2, C:C for C4 then stamp the date in the same row in D:D and the time in E:E.
My goal on the form is simply that when you click the check-box, it will highlight the cell green and place the date in the cell comment, and then clear the comment and color when unchecked.
I have been successful with the exception that I can only place text in the comment, but not a date stamp or even a reference to a hidden cell. I accomplished a date stamp command on a button with "Sheets("Sheet1").Range("Q5").Value = Date" but am unable to do this in a comment.
Below is what I have currently. I know it is not clean to look at, but that is how I found it and didn't want to create more variables for troubleshooting
Private Sub CheckBox1_Change() Sheets("Sheet1").Range("Q4").ClearComments Sheets("Sheet1").Range("Q4").Interior.Color = RGB(255, 255, 255)
[Code]....
I came across a couple results that seemed promising, but the code seemed to have a different syntax and I couldn't make it work with my VBA newbie skill level (started yesterday).