Issue with "Worksheet_SelectionChange"

[Steve@Rugby]

Hi,

I would really appreciate any advice on this if anyone can help.

I have created some code for Worksheet_SelectionChange that returns a message (only when sheet is unprotected) when any cell in columns Q:P are selected.

It works ok, however one issue I have is when you scroll over these cells using arrow keys on key board the code runs which is annoying as users may want to find data in these columns that way. They would soon get fed up as the message keeps popping up on every single cell movement.

I would really like to find a way to only run the code when:
1) The sheet is unprotected (which I have resolved)
2) Only run code when cell is selected with mouse click.

I guess what I am asking for is something that does not exist i.e. BeforeLeftClick event but was hoping there was some sort of work around.

Code I am using below:

Please Login or Register  to view this content.

Regards
Steve

[HaHoBe]

Hi, Steve@TRW,

you´re correct about the non existence of s BeforeLeftClick-event but I´m afraid VBA alon will only get hold of the cell being selected and not how that is being done: mouse, cursor, tab.

Running the code may be either done by unprotecting the worksheet prior to action and protecting it again at the end of the procedure or by using the Protect-Command with parameter UserInterfaceOnly:=True which is a volatile setting that is not saved with the workbook and should be set each time when opening the workbook.

Ciao,
Holger

[Steve@Rugby]

Hi Holger,

Thanks for your advice.

Kind regards
Steve