Я ищу способ, который будет скрывать строку "I", если отображается диапазон: QTYCALCON.

До сих пор я придумал это.

Sub Hide_Show()
 With Range("QTYCALCON").EntireColumn
  .Hidden = Not .Hidden
 End With
End Sub

2 ответа2

0

Это должно быть скорее размещено в переполнении стека. Однако здесь речь идет о скрытии столбца I:

Sub Hide_Show()
With Range("QTYCALCON").EntireColumn
    If Not .Hidden Then
        Range("I:I").EntireColumn.Hidden= True
    End If
End With
End Sub
0

Я предположил, что "я" был столбцом, и вы хотите, чтобы код работал в обоих направлениях, в зависимости от того, какой столбец скрыт. Итак, вот код, который я бы использовал.

Sub Hide_Show()
    If Range("QTYCALCON").EntireColumn.Hidden = False Then
        Columns("I").Hidden = True
    ElseIf Range("QTYCALCON").EntireColumn.Hidden = True Then
        Columns("I").Hidden = False
    End If
End Sub

Каждый раз, когда вы запускаете его, он проверяет, скрыт ли "QTYCALCON". Если нет, то будет скрыто "я". Если "QTYCALCON" скрыт, это покажет "I".

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .