根据上面的下拉选择隐藏活动工作表中的行

Question

尝试根据一个单元格中的单词隐藏行，

Sub HideRow18()

  If Range(D17) = "No" Then
    Range.EntireRow("18").Hidden = True

  Else
    If Range(D17) = "Yes" Then
      Range.EntireRow("18").Hidden = False

    End If
  End If

End Sub