View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Unexperienced user Unexperienced user is offline
external usenet poster
 
Posts: 1
Default Using VBA to track changes in a worksheet - help! Event procedure??

Dear Anita, I will appreciate if you allow me to can make
a comment on your request.

Dear Binzelli,

It looks it won't work on the following cases:
1. When updating several cells at the same time
(selecting range, and pressing Ctrl+Enter and input the
same value into every selected cell).
2. When writing formulas. The Log will reflect the value
not the formula.
3. When changing any value on a table, formulas will be
updated and hence changes on those (formula) cells will
be reflected on the Log sheet (although they should not
be there since these cells were not actually changed,
only the predecessors).

Is there a way to make work with these restrictions?

Sorry it this is too much :-(

Thanks for your reply.
-----Original Message-----
Dear Binzelli,

Thanks much! This looks like it just may be what I'm

looking for. I'm
going to try it as soon as I get in to work.

Thanks again,
Anita

Binzelli wrote:

Anita,

No problem, use the Worksheet_Change event in the code

for the sheet you
want to "track" (right click on the sheet tab and

select the menu item to
add code to that sheet)


The code below writes the change to a sheet

called "Log"
The row used to write the last change is stored in

cell B1 and is
incremented each time the event fires.


Private Sub Worksheet_Change(ByVal Target As Range)

Dim Lastrow As Long
Lastrow = ActiveWorkbook.Sheets("Log").Range

("B1").Value

'Write the Change
ActiveWorkbook.Sheets("Log").Cells(Lastrow + 1, 1)

= "Sheet (name) - Row " &
Target.Row & " - Column " & Target.Column & " changed

to: " & Target.Value

'Increase the LastRow value by 1
ActiveWorkbook.Sheets("Log").Range("B1").Value =

Lastrow + 1

End Sub




Good luck

"a" wrote in message
news:d9gCc.11261

...

Hi,

Is there a way to track changes made to a worksheet

using VBA?

I was thinking that perhaps there was an event

procedure. I envision
that the change could be displayed on a hidden sheet

when a change is
made - similar to the tracking changes tool but

without sharing a

workbook.

I'm on a deadline with this one and so any help would

be greatly
appreciated. I've asked about this issue before and

haven't received
any replies and so I'm thinking that maybe this cannot

be done.

Thanks in advance for any help,
anita






.