Quick VBA to check a list

[Simon.Ward]

Hi,

I need a quick VBA code to check a list as per attached and show a message box to flag up if there are any numbers on their own

ie in the list attached i want a message box to show up because "40" in row 25 is on its own, the rule is that all numbers must be in blocks of 2 or more

However i would NOT want the vba to ignore the "40" on its own because there is a block of 2 "40's" prior to it, they must be evaluated as individual blocks.

Let me know what you can do, much appreciated

Simon

Check VBA.xlsx

[Mumps1]

Try:

Please Login or Register  to view this content.

[Simon.Ward]

Great thanks ill give it a go

I need another vba code to follow on from this one and i know how to "Call" other codes however if there is a number on its own and the message box has appears i DONT want it to continue and call the next code, how do i stop it depending on the conditions

So:

If no numbers on their own, no message, call next VBA code

or

If a number on its own then show message and on clicking ok DO NOT call next VBA but return to worksheet

Many thanks

Simon

[Mumps1]

Add this line:

Please Login or Register  to view this content.

below this line:

Please Login or Register  to view this content.

This will stop the code after finding the first isolated number and should return you to your sheet.

[Simon.Ward]

ah thats brilliant thank you

[Mumps1]

My pleasure.

[Simon.Ward]

Sorry one more quick thing, if i wanted the msg box to show the number of the row above how would i adapt the c.Row??

I have also adapted your code to show a msg box if it detects a blank row:

Please Login or Register  to view this content.

[Simon.Ward]

duplicated post deleted

[Simon.Ward]

Sorry squash that i worked it out, c.Row-1 , so obvious