Worksheet_Calculate для нескольких диапазонов
У меня есть текущий код, вычисляющий значение одной ячейки, затем вызывающий модуль, если его значение превышает другое значение.
Как я могу проверить несколько диапазонов ячеек, например, B5: E5, B8: M8 и вызвать модуль, если какая-либо из ячеек в диапазоне превышает значение.
Private Sub Worksheet_Calculate()
If Range("B5") > 4 Then
Application.EnableEvents = False
Application.Run "Mail_small_Text_Outlook"
Application.EnableEvents = True
End If
End Sub