blank cell causing error in vba

[WindowGuy]

Hi All,
I am getting error when the cell is (blank) or (- Choose Option -) . otherwise it all works fine. Anyone know how to fix this?

Private Sub Worksheet_Change(ByVal Target As Range)

    If Range("aw14") = "one" Or _
       Range("aw14") = "" Or _
       Range("aw14") = "- Choose Option -" Then
        Rows("27:287").EntireRow.Hidden = True
    Else
        Rows("27:287").EntireRow.Hidden = False
    
    If Range("aw14") = "two" Then
        Rows("40:287").EntireRow.Hidden = True
    Else
        Rows("40:287").EntireRow.Hidden = False
    If Range("aw14") = "three" Then
        Rows("53:287").EntireRow.Hidden = True
    Else
        Rows("53:287").EntireRow.Hidden = False

View attachment 99920View attachment 99919

 

[WindowGuy]

Hi All,
I am getting error when the cell is (blank) or (- Choose Option -) . otherwise it all works fine. Anyone know how to fix this?

Private Sub Worksheet_Change(ByVal Target As Range)

    If Range("aw14") = "one" Or _
       Range("aw14") = "" Or _
       Range("aw14") = "- Choose Option -" Then
        Rows("27:287").EntireRow.Hidden = True
    Else
        Rows("27:287").EntireRow.Hidden = False
   
    If Range("aw14") = "two" Then
        Rows("40:287").EntireRow.Hidden = True
    Else
        Rows("40:287").EntireRow.Hidden = False
    If Range("aw14") = "three" Then
        Rows("53:287").EntireRow.Hidden = True
    Else
        Rows("53:287").EntireRow.Hidden = False

View attachment 99920View attachment 99919

nevermind it was an #N/A issue in a cell.

Problem solved.