Обработка события Updated не всего листа, а лишь одной ячейки

[neugadal]

Пытаюсь программировать на Visul Basic 6.0 и столкнулся вот с каким вопросом. В форме ввёл объект OLE - связь с EXCEL-листом - и обработку события Updated. Но подпрограмма соответствующая запускается при всяком изменении EXCEL-листа, а мне бы хотелось чтобы лишь при изменении определённой ячейки в нём, а то слишком часто получается. Но не знаю как это сделать - подскажите пожалуйста.

[VictorM]

где-то так, событие происходит при активации яч. А2

Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$A$2" Then
          Form_SelectDate.Show
    End If
End Sub

[neugadal]

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

[VictorM]

Да здесь, вроде, особо понимать нечего:
1. Сработать при изменениях на листе
2. если изменения произошли в яч. А2
3. Показать форму Form_SelectDate
ВАЖНО: код должен располагаться в модуле листа, на котором отслеживаются изменения.

[neugadal]

Понятно. Просто я подумал, что хорошо бы было если бы процедура-событие активизировалась не при любом изменении листа, а лишь при изменении определённой ячейки в нём. Ну просто чтобы не загружать процессор. Наподобие как таймер можно установить на произвольный interval, и на меньшие значения interval процедура активизироваться не будет. Но видимо это невозможно, только на весь лист.

[VictorM]

хорошо бы было если бы процедура-событие активизировалась не при любом изменении листа, а лишь при изменении определённой ячейки в нём.

так ведь в приведенном примере так оно и есть - процедура срабатывает ТОЛЬКО при изменении в яч. А2.
что не так?

[neugadal]

я понимаю так что процедура срабатывает при любом изменении листа, а далее в процедуре уже анализируется та ли ячейка изменилась или не та. Но процедура в любом случае активизируется, в ней срабатывает оператор IF - так ведь?

[дмидми]

VictorM, что-то я не понял, при чём здесь событие Worksheet_SelectionChange.
Речь явно должна идти о
Private Sub Worksheet_Change(ByVal Target As Range)

neugadal, Вы поняли верно: событие Worksheet_Change возникает и обрабатывается при любом изменении листа. Но ничего страшного в этом не видно: обработка при несовпадении адреса заканчивается очень быстро.

Отследить изменение одной ячейки (диапазона) можно только за счёт извращений с проверкой данных -- обращения при проверке к некоторой функции через имя диапазона (объект Name книги или листа), используемое в проверочной формуле. Но я бы не советовал - дело тёмное. Если всё же очень хочется - посмотрите A Formula In A Defined Name.