Sub Worksheet_SelectionChange

I have this code:

Please Login or Register  to view this content.

It works fine for place the Value but the problem is that regardless of where I
click on the sheet A1 get selected.

I tried an End If after Range("A1").Select but that generates an error.

Can someone please tell me why the first instruction seems to execute
only when I click on B1 and the second instruction executes anytime I click the sheet in any cell and how I get the code to run as intended.

Hi,

Try

Please Login or Register  to view this content.

VBA Noob