when target.address is a range

[yky]

I made a cell as a button so when the cell is clicked, a piece of code is run. The code looks like the following:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$O$1" Then
do something...

It worked fine. I then merged cells N1, O1, P1 but the code no longer works. I tried something like:

If Target.Address = range("N1:P1")

It did not work.

What should I do to make it work? Thanks.

 

[VoG]

Merged cells and VBA really don't work together but maybe

If Target.Address = "$N$1"

 

[jim may]

The address property looks for a string, not a Range...


If Target.Address = "$N$1:$P$1" Then

 

[Norie]

Try checking the target address for $N$1:$P$1.

 

[Scott Huish]

The reason for the above suggestions, is that a merged cell doesn't actually become one cell. It just makes multiple cells behave as if it is one. The value is always contained in the upper left cell of the merged range.

So, in this case, if you are selecting or working with the merged range N1:P1, you are actually selecting 3 cells at the same time.

 

[pgc01]

Hi

If O1 is part of a group of merged cells you can try:

If Target.Address = Range("O1").MergeArea.Address Then