Страницы: 1
RSS
Дата изменения ячейки в отдельную колонку+авторство
 
Помогите написать макрос
задача следующая - если в колонке А ктото меняет значение (напрмер было 5 стало 0) то в колонке B ставится дата этого события, а в колонке С автор изменения (файл в совместной работе)
Спасибо
Изменено: psychonaut - 07.03.2013 13:37:27
 
на сайте Д.Щербакова:
Ведение журнала сделанных в книге изменений
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
Код
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, [A:A]) Is Nothing Then
        Target.Offset(, 1).Resize(1, 2) = Array(Date, ActiveWorkbook.UserStatus(1, 1))
    End If
End Sub

Учимся сами и помогаем другим...
 
СССупер - прямо то что надо, спасибо!
 
возникла новая проблема (
после срабатывании данного макроса не работает Ctrl-Z -
то есть если случайно не то вбить, то даже не узнаешь, что изначально стояло (
 
Цитата
psychonaut пишет: ... после срабатывании данного макроса не работает Ctrl-Z
Макрос, он и в... макрос, однако... Жаль - не предупредили...  ;)
Изменено: Z - 07.03.2013 15:40:41
"Ctrl+S" - достойное завершение ваших гениальных мыслей!.. ;)
Страницы: 1
Наверх