Sub GV()
If Range("A1") >= "1" And Range("A1") <= "10" Then
Range("B2") = "YES 5"
Range("C3").Clear
Range("D4").Clear
ElseIf Range("A1") >= "11" And Range("A1") <= "100" Then
Range("C3") = "ABC 8"
Range("B2").Clear
Range("D4").Clear
Else: Range("D4") = "NO"
Range("B2").Clear
Range("C3").Clear
End If
End Sub