Форум по VBA и MS Office

VBA, Excel => VBA, макросы в Excel => Тема начата: Посетитель от 13 января 2021, 18:26

Название: Excel VBA Макросы. Как сделать, чтобы событие Worksheet_Change запускалось, если изменения произошли в нескольких ячейках?
Отправлено: Посетитель от 13 января 2021, 18:26
Как сделать, чтобы событие Worksheet_Change запускалось, если изменения произошли в этих ячейках: G28, H28, I28, J28?
Название: Re: Excel VBA Макросы. Как сделать, чтобы событие Worksheet_Change запускалось, если изменения произошли в нескольких ячейках?
Отправлено: Администратор от 13 января 2021, 18:33
Private Sub Worksheet_Change(ByVal Target As Range)
   
    ' Если изменения произошли в других ячейках, то выходим из события.
    If Intersect(Target, Range("G28, H28, I28, J28")) Is Nothing Then Exit Sub
   
    ' Здесь запишите ваши действия, какие должны произойти.
   
End Sub
Название: Re: Excel VBA Макросы. Как сделать, чтобы событие Worksheet_Change запускалось, если изменения произошли в нескольких ячейках?
Отправлено: Посетитель от 13 января 2021, 19:41
спасибо