Здравствуйте Всем!!
Пожалуйста, помогите с макросом. Написал макрос для скрытья столбцов, но тот не работает
Пожалуйста, помогите с макросом. Написал макрос для скрытья столбцов, но тот не работает
Код |
---|
Private Sub Worksheet_Calculate() If [B1] = 0 Then Columns("F:P").EntireColumn.Hidden = True Else Columns("F:P").EntireColumn.Hidden = False If [B2] = 0 Then Columns("G:P").EntireColumn.Hidden = True Else Columns("G:P").EntireColumn.Hidden = False End If End If End Sub |