Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.04.2012, 11:03   #11
miruff
Новичок
Джуниор
 
Регистрация: 05.04.2012
Сообщений: 2
По умолчанию

Цитата:
Сообщение от miruff Посмотреть сообщение
Ребят в Вашем примере отслеживается лист на котором были проведены какие либо изменения. А можно что то аналогичное проделать, но только не с листом а с ячейкой? Мне нужно знать не были ли изменены определенные ячейки. Спасибо за советы заранее!
Снимаю свой вопрос. Решил задачу. Если кому то чем то поможет, то вот как это я сделал:
Код:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Dim i, r, a As String
    If Target.Count > 1 Then Exit Sub
    If Target <> vValue Then
        For i = 2 To 26
            r = "$A$" + CStr(i)
            a = CStr(Target.Address)
            If r = a Then
                MsgBox "Был изменен тип схемы в ячейке с адресом: " & Target.Address & " и будут обнулены все связанные с ним данные."
                r = "B" + CStr(i)
                Range(r).Value = 0
                r = "D" + CStr(i)
                Range(r).Value = "EMPTY"
                r = "E" + CStr(i)
                Range(r).Value = "EMPTY"
            End If
        Next
    End If
End Sub
Коментарии не стал писать, думаю всё и так предельно ясно, учитывая что даже я новичок разобрался.

Последний раз редактировалось miruff; 05.04.2012 в 11:06.
miruff вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Отслеживание impulsgraw Работа с сетью в Delphi 3 12.06.2011 12:24
Сохранение изменений Dmitrov Помощь студентам 0 15.05.2011 13:36
Отслеживание изменений Fezdipekla Microsoft Office Access 3 09.07.2010 22:56
ячейка на одном листе, в которую необходимо подставлять данные из столбца, находящегося на другом листе Ирина Водолагина Microsoft Office Excel 4 04.03.2009 23:38
Отслеживание изменений(по времени и дате) Ксеноцид Общие вопросы Delphi 6 01.04.2008 10:59