How to stop macros running if not in certain columns

[JazzSP8]

Hi All

I've got a macro which I've attached to a button to perform a simple operation, this works OK, however because of its nature I only want it to be able to run in certain columns.

Thing is, I can make it work only in one column, but not different columns, I thought 'Or' would have let me do it, but, alas no...

Heres the code;

WhichCol = ActiveCell.Column

If WhichCol <> 11 Then Exit Sub

Which means it will work ok in column K...

I've tried changing to;

WhichCol = ActiveCell.Column

If WhichCol <> 11 Or 14 Then Exit Sub

To allow for column K and N but then it stops working completely but doesn't give me an error message.

Anyone help? - I seem to be stuggling to use the search on the message board and I'm banging my head against the keyboard.

Thanks in advance.

Jazz

 

[StephenR]

You might need to change your approach to

If WhichCol <> 11 And WhichCol <> 14 Then Exit Sub

Here's a Select Case approach:

WhichCol = ActiveCell.Column

Select Case WhichCol
    Case 11, 14
        ' do whatever
    Case Else
        Exit Sub
End Select

 

[JazzSP8]

Stephen, thanks for that!

The case method did the job and I can work on letting the impression of the keys slowly fade out of my forehead.

Cheers!