excel - 选择并隐藏 2 个命名行之间的整行

Question

我有两个命名的行，其中包含我想在隐藏和未隐藏之间切换的信息。我不想使用数据分组，因为命名行之间的信息经常移动。

上排 YEAR2019 和 YEAR2020 将始终保持可见。

我目前正在尝试这个但收到错误并且似乎无法让它工作 -

Sub HideRowsYEAR2020()
    Range(.Cells(.Range("YEAR2019").Row + 1), _
                .Cells(.Range("YEAR2020").Row - 1)).Select
    If Selection.EntireRow.Hidden Then
        Selection.EntireRow.Hidden = False
    Else
        Selection.EntireRow.Hidden = True
    End If
End Sub

Answer 1

当您使用它时，.它应该在 with 语句中。喜欢With ActiveSheet

还Cells()期望将列引用作为第二个标准。

Sub HideRowsYEAR2020()
    With ActiveSheet 'Should change to actual sheet
         With .Range(.Cells(.Range("YEAR2019").Row + 1, 1), .Cells(.Range("YEAR2020").Row - 1, 1))
            If .EntireRow.Hidden Then
                .EntireRow.Hidden = False
            Else
                .EntireRow.Hidden = True
            End If
        End With
    End With
End Sub