Test Cell for contents

Hi,

K2 holds a formula that returns an integer/number.

I would like to test as follows (pseudo code):

If Cells("K2") ..... Is Numeric And > 7 'Then do one thing (1)
ElseIf IsNumeric And < 7 ' 'Then do something else (2)
Else There's something very wrong, so start to panic ! (3)

Basically 1 will be the expected situation, and 2 is a realistic possibility, but rare
3 should not ever be the case.

There is one other test:
If user has deleted the formula but then inserted their own number.
That too would be a problem, so a test for the formula would be good.

Regards and thanks.

Maybe:

Please Login or Register  to view this content.

Although I don't see how (3) could ever be the case?

Thanks to you both.

Since this check is running in Event code, I think it'll be best to put the Select Case construct into a Function ?, then call the appropriate procedure from there.

Good/bad idea?

Thanks again.
(and I really should have remembered Select Case).

I use Select Case in event code all the time?

Thanks John,

I had seen advice that best practice was to keep all Event subs limited to deciding which procedures to run.
This permits the same Event to be used for different purposes.

That was why I questioned whether a Function was appropriate.

Regards and thanks.