隐藏 Excel 中的行并保持表格格式

隐藏 Excel 中的行并保持表格格式

当选定一个单元格时,我使用 VBA 隐藏了一行。问题是,当我隐藏该行时,表格格式的颜色会混乱。隐藏行时,有没有办法让表格格式保持更新?提前致谢

您可以在图片中看到一个示例,当我隐藏第 45 行时,表格颜色会变得混乱。编辑:这是我的代码……当我单击单元格 C44 时,它会从红色变为绿色或向后变为红色,并隐藏或取消隐藏第 45 行。

If Selection.Count = 1 Then
If Not Intersect(Target, Range("C44")) Is Nothing Then
    If Range("C44").Interior.Color = RGB(255, 0, 0) Then
    Range("C44").Interior.Color = RGB(0, 255, 0)
    ActiveCell.Offset(0, 1).Select
    Rows("45").EntireRow.Hidden = False
    GoTo FIN_C44
    End If
    If Range("C44").Interior.Color = RGB(0, 255, 0) Then
    Range("C44").Interior.Color = RGB(255, 0, 0)
    ActiveCell.Offset(0, 1).Select
    Rows("45").EntireRow.Hidden = True
    GoTo FIN_C44
    End If
End If
End If

1 2

相关内容