这是我的要求:
用户将在下拉列表中选择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