Using Worksheet_SelectionChange, so code only runs when specific cells are changed

Hello,

I am trying to use the Worksheet_SelectionChange event for the first time instead of using the Worksheet_Change event in the hopes that it will only run the macros when specific cells are changed. This is because when it runs, there is a very long lag time, which holds up the ability to use the spreadsheet if the change event is used. So, since the macros are only needed rarely when specific cells are changed, I was hoping the selection change event would work.

Below is part of the code I came up with. I need the code to run when there are changes to cells R4, P1, P2, A10, and A14. The code is actually much longer with many more like A10 and A14, but I omitted them for this example.

I tried just using two of the targets in the example I found online, If Target.Address = "$R$4" Or Target.Address = "$P$1" Then MsgBox "Success".But it isn't working, so I obviously included it wrong.

Please Login or Register  to view this content.

Hi Kristine,

The normal check for the Event Firing is like this:

Please Login or Register  to view this content.

Read more about it at:
http://www.ozgrid.com/VBA/vba-intersect.htm

Also could you edit your post above, select the code lines and click on the "#" sign to put Code tags around it. That makes it much more readable for us humans. I've done this with my line of code above.

Hey,

Why again SelectionChange instead of simply Change??

See this code and see it work, behind a worksheet.

Please Login or Register  to view this content.

Change any cell except for those listed in the Union above and code will only stop when you change one of them.

Hi Kristine,

I really think my code above does what you are asking for. If you change any of these cells
Range("R4"), Range("P1:P2"), Range("A10"), Range("A14")
the code will run, otherwise it will skip down to the End If statement and not run.

I'm sorry that I can't explain it better.. Perhaps if you were to attach a sample workbook and show us what you are trying to do?

Closed at request of OP so that question may be posted to Commercial Services.