VBA to include N/A or n/a in code

[bdouglas1011]

I have code that looks for a cell to be blank and if so then it applies another value.

Problem is I have people in the field that will put n/a or N/A in the cell which screws it all up. How can I add the N/A or n/a to be recognized as blank so the then is applied correctly?

If Range("C4") = "" Then

 

[BSALV]

     vt = VarType(Range("C4"))                                  'vartype of C4
     If vt = vbEmpty Or vt = vbError Then MsgBox "1"            ' empty or error

 

[bdouglas1011]

I am getting else without if
when I add the new code

her is what also I have

    If Range("C4") = "" Then
                      Surveys.Range("E369") = Range("H15").Value

    Else
                       Surveys.Range("E369") = Range("C4").Value

    End If

    If Range("D4") = "" Then
                  Surveys.Range("F369") = Range("H16").Value

    Else
            Surveys.Range("F369") = Range("D4").Value
    End If