I am trying to make a change history macro that will record the change in a table at the bottom of the page. i have attached a copy of the spreadsheet i am using and the Tab 1658X is where i want to try the macro first
I am trying to make a change history macro that will record the change in a table at the bottom of the page. i have attached a copy of the spreadsheet i am using and the Tab 1658X is where i want to try the macro first
You need to be much more specific about what changes you are trying to record. Your spreadsheet has lots of data on it. Is it changes to specific data fields or all datafields that you want to record or changes to the structure of the workbook itself that you want to record. How many previous versions do you need to keep? Are they going to be kept on the same worksheet, do we need to limit how big it can get, do you need to record when the changes are made.
what format do you want the records to be kept in
sorry for the delay in replying. the data that needs to be recorded is in cells B7 to H50, B56 to D63, and B69 to D70. At the bottom of tab 1658X there is a table that the data needs to be recorded to. The only thing i need tracked is the values in each of those cells. when a change to say D7 i need the original value recorded and then the new value entered recorded in the table at the bottom of the sheet. Again see tab 1658X for the example. Also all the tabs with numbers will have the exact same table and the data areas will be the same.
If you have any other questions just let me know.
In your table at the bottom you have got a column " Nomenclature/ Inspection" I am guessing but do you want to record the text in Column B for each change that is made in the the other columns? e.g. if D6 is changed do you want to record "bearing" in B73 and the new and old values of D6 in B 74 and B75
if cell D7 is changed i want "main rotor blade" in B73 the old value in C73 the new value in D73 and the date and time the change was made in E73
Here try this , I have put in a warning if you try to modify more than one cell e.g by deleting two or more cells it will come up with a message box.
I realised that I left out the date, you need to add this line to the worksheet change event:
Cells(lastrow, 5) = Now()
awesome thats what i needed thanks
Posting Permissions
Reply With Quote
