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 have an excel file that I use to track all my financial investments. The file is already set up with a query to retrieve stock prices when I refresh the document.
I would like to be able to open up the document, and store the closing price of the stock(s) with a date in the next column over. With this information I can graph weekly, monthly annually, or any time period I want.
I have been searching for a couple of hours now, and I could not find anything similar to this. I would think this is a pretty common idea for many people tracking their investments with Excel, so if it has been covered perhaps someone can point me in the right direction.
I don't have any programming experience in excel so as detailed of an explanation as possible
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 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
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 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)
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 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.
I have a column (D) where I put percentages complete of a task. When that reaches 100% I want to put the date in column (C).
I found many samples online but nothing I can modify to do this.. This one is pretty straight forward but I'm not sure how to have it look for the value and not just empty or not. I would be greatful for any help you can offer.
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 4 Then Exit Sub If Target.Row = 1 Then Exit Sub If IsEmpty(Target(1)) Then Exit Sub If IsEmpty(Target.Offset(0, -1)) Then Target.Offset(0, -1) = Date Target.offset(0, -1).numberformat = "yyyy-mm-dd" End If End Sub
I work in a sales team, and am currently planning the new year of sales spreadsheets (tracking prospects and orders) These spreadsheets are linked in both directions to the Sales Director's summary spreadsheet (so that she can set the targets, and also provide a summary to the MD). She has asked me whether it is possible to put a formula in that gives the date each line (1 line = 1 prospect) was updated (so that she can see whether information in the line is current / a week old / a month old etc)
Effectively, what I need is in column A a formula which references columns B-Q and if any of those change, puts in the date of change. Is this possible, or am I going to have to ask the sales guys to do it manually? I have tried to use the =Now() function, but, because the spreadsheets are linked, and auto-update on opening, every time the spreadsheet is opened, each line goes to today's date.
The previous threads that I looked at suggested either: volatile time stamp in shared workbook
That is bad design, Enter =NOW() to a single name cell named cell and use date =MyD-T in ALL cells needing the Date & Time. Where MyD-T is the named cell. I would advise STRONGLY against using Manual Calculation as it's NOT good spreadsheet design and a mistake waiting to happen.
In my job, my team have to take phone-calls from stores asking various questions. In order to combat this, I have set up a call tracker to see where the calls are coming from (so we can beat them with a stick). I have asked my colleagues to record the date and time of the calls.
I need a big button at the top of the page that says 'New Call'. Then, when this button is pressed, the time and date stamp will automatically be put into cell A3, then when pressed again a4, and again a5... and so on.
I am struggling with the following:
-Using CTRL + Shift + : to input the date/time on a macro inputs the date I made the macro, not the date/time the button is pressed! -I can only get the date to go in cell A2 - If I press it again, nothing happens. how to do this, or just do it for me
i need to put a date stamp when a change is made in b3:b31 into e3:e31 for each row also i need to put a date stamp into g3:g31 when a change is made in F3:f31 i try to use 1 "worksheet-change" and it is fine once i use 2 i get Ambiguous Name Detected errors
Private Sub Worksheet_Change(ByVal Target As Excel.Range) With Target If .Count > 1 Then Exit Sub If Not Intersect(Range("b3:b31"), .Cells) Is Nothing Then Application.EnableEvents = False If IsEmpty(.Value) Then .Offset(0, 3).ClearContents Else With .Offset(0, 3) ............
I have two identical web query's on the same sheet. One from column A to column I and the other one from column K to column S, and both have 404 rows. The one on the left (from column A to I) autorefreshes every 60 minutes and the one on the right (from column K to S) autorefreshes every 4 minutes. I want to subtract the numbers in column Q from column G and the ones in column R from column H, and in both cases if the result is bigger than 0 to place a timestamp in column Y(for Q-G), and in column Z (for R-H). I tried with NOW formula, but the timestamp changed every time the web query from the right autorefreshed, no matter of the result. I guess that I have to use VBA codes...but I'm not good at that .
I am working on an Inventory Spreadsheet. I have need it to date time stamp that willpopulate a different cell /field when text are entered in a different cell/field and will not change all the previous dates entered on the spreadsheetevery time I re-open the spreadsheet. I formula I am using is =IF(E3<>"",IF(D15="",NOW(),D15),"")and it changes each time I open thesheet to do the inventory so I do not know the date of the last inventory. Iwant to capture the actual date that the inventory was completed in thesecond/different cell?
VBA coding for automatically saving an excel file as another file using the current date as part of the file name together with "32ga" as a constant add-in. I also what this macro to run at a particular time of the day let say 00:20hrs. The excel file i want to save as is always open . It has data that changes every 24-hrs.
I have a workbook that retrieves data from a file from a URL address upon opening. Actually, I am saving the URL file to a local drive and then updating my workbook with this data. The problem is that the job that updates the URL file sometimes fails. I want to notify the user of my workbook that the data has not been update recently. I am trying to use the built in document properties (Last Save Time) but I cannot get it to work except for the workbook that has the macros in it. Is there a way to find the last save time of a workbook (from a URL address) seperate from the workbook that has the marco? Below is my current code that errors out at:
dp = Application.Workbooks("DockReportExport.xls").BuiltinDocumentProperties("Last Save Time") with and runtime error.
Sub FTP() Application.DisplayAlerts = False Application.ScreenUpdating = False 'Open file from URL addres to check last save time Workbooks.Open Filename:="http://172.16.1.94/Files/Operations/...portExport.xls" 'Check if data on server has been updated in the last 15 minutes
I have a file that sits open all the time, and performs some refresh functions every thirty minutes. I need the file to save a copy of the tab as a CSV file at a given time interval. The code below is almost there, just need to work with the time interval part. The way it should work is to open the csv, copy / paste the active sheet; then close the csv; leaving the original excel file open. I can run it, and it works, but the time interval is not triggering.
I can get the time interval to work by itself, and the save csv part to work by itself also; I need them to work together.
VB: Sub test() Application.OnTime Now + TimeSerial(0, 1, 0), "test" Dim OutputFile As Workbook, InputFile As Workbook Dim sDD As Worksheet
I am not sure that I can do this, but here is what I would like to do. I have a worksheet that I initial when I start a job in on cell and then when I finish in another cell. What I's like is to have a macro running in the back ground that will tell me the total elapsed time from when I started to when I finished.