Добрый день, друзья!
Помогите пожалуйста как можно запускать макроса автоматический при изменение суммы в ячейках $I$1:$J$1
Мне нужен автоматический запуск этого макроса
Sub ÏîêàçàòüÏîÓñëîâèÿì2()
Dim i As Long: Application.ScreenUpdating = False
For i = 1 To Cells(1, Columns.Count).End(xlToLeft).Column
If Cells(1, i) = 0 Then
Columns(i).Hidden = True
Else
Columns(i).Hidden = False: Columns(i).AutoFit
End If
Next
End Sub
Помогите пожалуйста как можно запускать макроса автоматический при изменение суммы в ячейках $I$1:$J$1
Мне нужен автоматический запуск этого макроса
Sub ÏîêàçàòüÏîÓñëîâèÿì2()
Dim i As Long: Application.ScreenUpdating = False
For i = 1 To Cells(1, Columns.Count).End(xlToLeft).Column
If Cells(1, i) = 0 Then
Columns(i).Hidden = True
Else
Columns(i).Hidden = False: Columns(i).AutoFit
End If
Next
End Sub