Историе изменение ячеек

[d_adilet]

Сообщение от SAS888

Вот это и не понятно, какие ячейки Вам нужны.
Для того, чтобы в примечании к ячейке хранились 10 последних измененных значений с датой изменения, можно использовать пример во вложении (без всяких глобальных переменных). Попробуйте поизменять значение ячейки "A1" и после каждого изменения смотрите примечание.
Для реализации Вашей задачи, вместо строки

If Target.Address <> [A1].Address Then Exit Sub

нужно вставить код, который будет проверять, подходит ли текущая измененная ячейка под Ваши критерии, или нет. Повторяю, что именно эти критерии мне и неизвестны.

Ребята, подскажите пож-та как сделать так чтобы не только в ячейке [A1] а к примеру в диапазоне A10:B35. Заранее большое спасибо.

[SAS888]

Например, так:

If Target.Cells.Count > 1 Then Exit Sub 'Если, конечно, это Вам нужно
If Not Intersect(Target, [A10:B35]) Is Nothing Then
    'Ваши действия
    'в случае, если ячейка принадлежит диапазону "A10:B35"
End If

P.S. Правила форума: новый вопрос - новая тема.

[d_adilet]

Огромное спасибо SAS888.

На счет нового вопроса ...прошу прощения не подумал...счел за продолжение темы

[id48]

а как сделать что бы все работало как во втором прикрепленном файле, но только что бы макрос работал во всей ячейках опреднеленного столбца

[KOSTIK1]

Вот примерно так.

[id48]

Сообщение от KOSTIK1

Вот примерно так.

Спасибо KOSTIK1