隐藏及；取消隐藏Excel行

以下是我的要求：

用户将在下拉列表中选择1-10，这将取消隐藏此列表下方最多10组行。让我们将每个要隐藏/显示的组称为“X”，X由大约13行组成，并且有10个X垂直堆叠在工作表上。因此，例如，当用户选择“2”时，它将显示前两个X，但其余8组行仍然隐藏。代码的这一部分工作正常，但它是背景

这是不工作的部分。在每个“X”（现在根据以前的输入显示的一组行）中，用户在页面下方输入信息，当它们向下时，我希望单个X中的某些行根据输入隐藏/取消隐藏

例如，如果用户将“住宅状态”输入为“租赁”，则应取消隐藏一行，显示“在此输入每周租金”。或者，如果用户将其输入为“其他”，则应取消隐藏另一行，显示“请评论”

希望这能澄清,

这是我当前的第一个“X”代码，我想我应该先修复这个部分，然后复制它：

If Cells(3, 55).Value = "1" Then
    Rows("57:70").EntireRow.Hidden = False 'User selects options 1- 10
    If (Range(C62) = "Renting" Or Range(C62) = "Paying Off Home - Mortgaged To OFI") Then
        Rows("63").EntireRow.Hidden = False
        Rows("64").EntireRow.Hidden = True
    ElseIf (Range(C62) = "" Or Range(C62) = "*") Then
        Rows("63:64").EntireRow.Hidden = True
    ElseIf Range(C62) = "Other" Then
        Rows("63").EntireRow.Hidden = True
        Rows("64").EntireRow.Hidden = False
    End If
End If

---

使用

单元格（3，55）。Value=1

我不确定当你谈论用户正在选择的

X

时，我是否理解你的意思？他们应该选择选项1-10，但你只向我们展示了目前为止的3个场景。这段代码按原样工作吗？你想给它添加一些东西吗？是的，它（有点）工作，但并没有达到你想要的一切。为了清楚起见，仅显示一个示例。在本例中，我会说“X”是第57:70行（第2行）。代码在隐藏/取消隐藏之前隐藏/取消隐藏的相同行的部分不起作用