Halt A Macro If a Cell Contains a Certain Value

[John]

I'm looking for a macro to be halted if the value in a cells is less than a
certain figure, with a dialog box informing the user appearing

Cell with value is C1 and anything less than 10, should halt the existing
Macro I have, with a Dialog box appearing showing "Halt Who goes there"

Thanks

 

[Tom Ogilvy]

with Worksheets("Sheet3")
if isnumeric(.Range("C1")) then
if .Range("C1").Value < 10 then
msgbox "Halt Who goes there; number less than 10"
Exit sub
end if
Else
msgbox "Halt Who goes there; no number in C1"
exit sub
End if
End With

' continue to process

 

[John]

Thanks for the code Tom

with Worksheets("Sheet3")
if isnumeric(.Range("C1")) then
if .Range("C1").Value < 10 then
msgbox "Halt Who goes there; number less than 10"
Exit sub
end if
Else
msgbox "Halt Who goes there; no number in C1"
exit sub
End if
End With

' continue to process

 

[John]

Tom

I wish to remove the message "msgbox "Halt Who goes there; no number in C1",
just want the one dialog box, but I can't work out my If's from my with's

 

[Tom Ogilvy]

If C1 will always contain a number

with Worksheets("Sheet3")

if .Range("C1").Value < 10 then
msgbox "Halt Who goes there"
Exit sub
end if
End With


--
Regards,
Tom Ogilvy


rg

 

[John]

Thanks Tom, I get totally confused with the number of if, end if, with etc,
no matter what I take-out / remove it always seems to hit debug