Мяв. Заинтересовался вопросом, как в Аксессе выполнить VBA процедуру по событию. Событийный макрос к таблице привязал, VBA код вставил. А дальше тупик. Аналог в Excel выглядит так [vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [b2:b5]) Is Nothing Then Target.Next = 2 * Target ElseIf Not Intersect(Target, [c2:c5]) Is Nothing Then test End If End Sub
Sub test() MsgBox "Мяу!" End Sub
[/vba] Вопрос не практического, а чисто познавательного плана.
Мяв. Заинтересовался вопросом, как в Аксессе выполнить VBA процедуру по событию. Событийный макрос к таблице привязал, VBA код вставил. А дальше тупик. Аналог в Excel выглядит так [vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [b2:b5]) Is Nothing Then Target.Next = 2 * Target ElseIf Not Intersect(Target, [c2:c5]) Is Nothing Then test End If End Sub
Sub test() MsgBox "Мяу!" End Sub
[/vba] Вопрос не практического, а чисто познавательного плана.RAN
Так работает же. Если ввести в Столбец3 любое число и нажать Enter, получим Столбец2*3, как заказывали
=================================================== А если надо выполнить test(), надо сделать его функцией, а затем выбрать макрокоманду ЗадатьЛокПеременную и присвоить ей test()
Так работает же. Если ввести в Столбец3 любое число и нажать Enter, получим Столбец2*3, как заказывали
=================================================== А если надо выполнить test(), надо сделать его функцией, а затем выбрать макрокоманду ЗадатьЛокПеременную и присвоить ей test()Pelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816
Дратути. Как вариант, пользовать ЗадатьЛокПеременную меняем Sub на Function и В макросах (Создание>Макрос) для запуска vba кода (тоже должна быть функция) есть ЗапускПрограммы
Дратути. Как вариант, пользовать ЗадатьЛокПеременную меняем Sub на Function и В макросах (Создание>Макрос) для запуска vba кода (тоже должна быть функция) есть ЗапускПрограммыkrosav4ig
Мурси. То, что искал. Про функцию уже догадался, не мог сообразить, куда ее воткнуть. А где про макрокоманды почитать поподробнее? А то F1 не помогает, а поиск выдает не то, что ищу.
Мурси. То, что искал. Про функцию уже догадался, не мог сообразить, куда ее воткнуть. А где про макрокоманды почитать поподробнее? А то F1 не помогает, а поиск выдает не то, что ищу.RAN