Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I have code in a workbook_BeforeSave event that Appends a txt file with an
entry that stamps user & date/time when the file is saved. I would like to log any specific cells that are changed. The workbook has many worksheets and I can conditionally choose the time period that I want to track the changes. If cell $C$5 on sheet3 is changed, I want to log this and any other sheets that are changed. Thanks, Sam |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
This code should give you a start. The allChanges variable will keep track
of each change made in the workbook. You may need to add additional code to track the sheet the change was made on. This code should be put into the ThisWorkbook module. Public allChanges As String Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) allChanges = allChanges & "Cell(" & Target.row & "," & Target.Column & _ ") changed to '" & Target.Value & "'" & vbCrLf End Sub "Sam" wrote: I have code in a workbook_BeforeSave event that Appends a txt file with an entry that stamps user & date/time when the file is saved. I would like to log any specific cells that are changed. The workbook has many worksheets and I can conditionally choose the time period that I want to track the changes. If cell $C$5 on sheet3 is changed, I want to log this and any other sheets that are changed. Thanks, Sam |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Deleting specific rows with a specific criteria using inputbox | Excel Programming | |||
Not allowing to continu unless a specific cell has specific answer | Excel Discussion (Misc queries) | |||
Send data from userform to specific cell on specific sheet? | Excel Programming | |||
Link from a specific Cell in Excel to a specific para. in Word | Excel Worksheet Functions | |||
Form a circle (ie. color specific cells) given specific radius | Excel Programming |