понедельник, 10 сентября 2012 г.

Ведение журнала в Excel (кросспост)


На днях один из сотрудников решил поиграться с VB и excel. Подкинул очень полезный и интересный скрипт о ведении логов изменений в книге Excel. Статью можно прочитать тут


В ходе тестирования пришли к выводу, что удобней было бы видеть не изменение самого значения, а изменения формулы. Для этого параметр Target.value необходимо изменить на Traget.FormuleLocal в строках:

if Not IsError(Target) Then sValue = Target.Value Else sValue = "Err" If Not IsError(Target) Then sLastValue = Target.Value Else sLastValue = "Err"

Параметр FormuleLocal возвращает занчени формулы, если была задана формула в ячейке; значение константы, если была константа; или пустую ячеку.


При использовании данного скрипта отключается возможность отметь изменения через ctrl+z

Комментариев нет: