если я правильно понимаю, то файло лежит на сервере (либо в расшаренной папке) и доступно множеству, возможно неопределенному даже, юзеров???  
афигеть  
ну или я ошибаюсь :-)  
так вот, чтоб "кто-то" не гадил в книге (а мне, как полиграфисту, это крайне неприятно), надо ...  
эээ... коллега, большая книга? ВСЕ ли поля должны в ней иметь возможность ПРАВИТЬ ВСЕ пользователи?  
 
ну так вот, надо... раздать права. как это сделал я.  
- одному отделу - ТОЛЬКО чтение всех книг в папке  
- другому - одну могут править (с условием, о чем ниже), а другие только читать.  
 
- шеф, конечно же! все может править (но только он так думает, на самом деле не всё, но это военная тайна, выпитая между мной и сисадмином)  
 
а теперь про условия второго пункта:  
можно же защитить лист и задать пароль. а пароль сообщить только некоторым. тогда и гадить ВО ВСЕЙ книге просто не получится    
:-)  
а по делу, то есть как узнать кто  гадил, увы... не помогу.

Я как-то тоже задавался таким вопросом, мне наши айтишники выдали сетевое имя (ну и соответственно пользователя этого компьютера), который был последним редактором и который нагадил.

{quote}{login=mazayZR}{date=15.08.2008 10:59}{thema=}{post}надо опросить гуру на предмет создания макроса на основе функции    
=ЯЧЕЙКА("имяфайла")  
вот если бы макрос при каждом закрытии файла сохранял копию в папку по умолчанию у каждого юзера и в скрытый лист вносил бы запись =ЯЧЕЙКА("имяфайла") и время с датой  
тогда можно будет и отследить гадюна :-){/post}{/quote}  
Мона что нить такого плана  
Private Sub Workbooks_open()  
   Sheets.Add  
   ActiveSheet.Cells(1, 1).FormulaR1C1 = "=CELL(""имяфайла"")&"" ""&DAY(TODAY())&""-""&MONTH(TODAY())&""-""&YEAR(TODAY())"  
   ActiveSheet.Visible = False  
   ThisWorkbook.SaveAs "C:\temp"  
End Sub

... другое дело, если тот, кто гадит, при открытии книги отключает макросы - никак не спалишь

а вот и нет!  
как раз если именно он и отключает, то именно его и не будет в записях :-)  
кажется так.  
может конечно что он и не пользовал книгу, но статистика покажет

Я бы отслеживал сохранение книги. Открытие и изменение без сохранения меня бы не волновали.  
На выбор:  
При сохранении сохраняем копию в отдельную папку:  
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)  
Application.EnableEvents = False  
Application.DisplayAlerts = False  
Application.ScreenUpdating = False  
With ThisWorkbook  
.SaveCopyAs "\\server\хитрая папка\" & .Name & "_" & CreateObject("WScript.Network").UserName & "_" & Format(Now, "dd.mmm.yy hh:mm:ss")  
End With  
Application.EnableEvents = True  
Application.DisplayAlerts = True  
Application.ScreenUpdating = True  
End Sub  
 
Или сохраняем данные о пользователе и времени на скрытом листе.  
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)  
Application.EnableEvents = False  
Application.DisplayAlerts = False  
Application.ScreenUpdating = False  
With ThisWorkbook.Sheets("Скрытый_лист")  
j = .Cells.SpecialCells(xlLastCell).Row + 1  
.Cells(j, 1).Value = CreateObject("WScript.Network").UserName  
.Cells(j, 2).Value = Now  
End With  
Application.EnableEvents = True  
Application.DisplayAlerts = True  
Application.ScreenUpdating = True  
End Sub  
 
Без макросов никак. Если только ZVI не напишет что-нить на ExcelMacro4

Лузер, а такое возможно?  
Есть примеры?