Як автоматично запускати макрос, коли змінюється результат формули комірки?

Припустимо, у мене є список формул на основі даних у стовпці A та стовпці B, як показано на наступному скріншоті, тепер я хочу запускати певний код макросу автоматично, коли результат формули змінюється із зміною його відносних комірок. Чи є хороша ідея вирішити цю роботу в Excel?

Автоматично запускати макрос, коли результат формули комірки змінюється за допомогою коду VBA

Автоматично запускати макрос, коли результат формули комірки змінюється за допомогою коду VBA

Наступний код VBA може допомогти вам автоматично виконати певний код при зміні комірки результату формули, зробіть так:

1. Клацніть правою кнопкою миші вкладку аркуша, яку потрібно використовувати, а потім виберіть Переглянути код з контекстного меню у відкритому вікні Microsoft Visual Basic для програм вікно, скопіюйте та вставте наступний код у порожній модуль:

Код VBA: Автоматично запускати макрос при зміні результату формули комірки:

Private Sub Worksheet_Calculate()
'Updateby Extendoffice
    Dim Xrg As Range
    Set Xrg = Range("C2:C8")
    If Not Intersect(Xrg, Range("C2:C8")) Is Nothing Then
    Macro1
    End If
End Sub

примітки: У наведеному вище коді, C2: C8 це діапазон клітинок формул, які ви хочете використовувати ，maco1 - це назва макросу, який ви хочете запустити автоматично. Будь ласка, змініть це на свої потреби.

2. Потім збережіть і закрийте це вікно коду, тепер, коли дані в діапазоні A2: B8 змінюються, щоб спричинити зміну результату формули, ваш конкретний код макросу запускається відразу.