VBA Save if cell is not less then 3

[skate1991]

Hi All,

I am trying to save a document using a button if the value is 3 or more. I have the below code which stops the document from saving and comes up with a message box.

The issue is that it carries on going through the code and then turns into a run time error 1004

What i need it to do is when it shows the message box for it to stop running the rest of the code.

Please Login or Register  to view this content.

Thanks

[Kenneth Hobson]

Add Exit Sub before End If?

[skate1991]

Hi Kenneth,

Thanks for the response. I have amended the code to the below but it is still coming up with the same error.

Please Login or Register  to view this content.

[jason.b75]

Removed, too many errors in code.

[skate1991]

Thanks jason.b75 but still coming up with the same error.

[jason.b75]

Which line is causing the error?

Application.Sheets stands out as wrong, although I've never tried it to see if it does work.

Please Login or Register  to view this content.

[skate1991]

Thanks for looking at this jason.b75

i have changed the code to incorporate the above and it still coming up with the 1004 netgid saveas error

Please Login or Register  to view this content.

[jason.b75]

There seems to be a mix of issues between various edits, I just noticed a novice error in the change I made in post #4.

Try this variation

Please Login or Register  to view this content.

If you still get issues, hit the Debug button on the error message and tell us which line is in yellow.