Simple VBA Code not working

[drhatmrexcel]

Simple Code does not work


If Range("B7") = "1" Then
End If

When there is a 1 in cell B7 the code falls through and executes the remaining code whereas it should stop immediately.

 

[Peter_SSs]

Simple Code does not work


If Range("B7") = "1" Then
End If

When there is a 1 in cell B7 the code falls through and executes the remaining code whereas it should stop immediately.

Try removing those red quotes which convert the number 1 into the string "1"

 

[BrianJN1]

I'd like to see a bit more of the context of your code but I'd that you consider inserting:
Exit If
within the IF.

And yes, I did miss the quotes, so depending upon your scenario you may have another thought to consider.

 

[JoeMo]

Simple Code does not work


If Range("B7") = "1" Then
End If

When there is a 1 in cell B7 the code falls through and executes the remaining code whereas it should stop immediately.

Depends on what's after the End If. If you want the code to stop try:

If Range("B7") =1 Then
Exit Sub
End If

 

[drhatmrexcel]

OK adding the Exit Sub before the End If did the trick
Now I will see if it works in my main spreadsheet.
Been suffering why a simple IF statement was not working.
Thank You JoeMo and all others on the site.

 

[JoeMo]

OK adding the Exit Sub before the End If did the trick
Now I will see if it works in my main spreadsheet.
Been suffering why a simple IF statement was not working.
Thank You JoeMo and all others on the site.

You are welcome - thanks for the reply.