View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
IC[_2_] IC[_2_] is offline
external usenet poster
 
Posts: 26
Default Code doesn't work on merged cells

Thanks for the explanation, Dave

Ian

"Dave Peterson" wrote in message
...
If Target.Cells(1).Address

That (1) portion said to look at only the first cell in the merged area.

Without it, target.cells.address included the address of the whole merged

area:

$M$2 vs. $M$2:$N$2



IC wrote:

I'd tried combinations with and without N2, but the closest I could get

was
the CB enabling when expected, but not disbling again.

Your solution works a treat, though I don't see why.

Many thanks to you and others who added their input.

Ian

"Jim Rech" wrote in message
...
The tricky part seems to be that when you make an entry the Target is

M2
but
when you Clear the merged cell the Target is M2:N2, so:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Cells(1).Address = "$M$2" Then
If IsEmpty(Range("M2")) Then
ComboBox1.Enabled = False
Else
ComboBox1.Enabled = True
End If
End If
End Sub


--
Jim Rech
Excel MVP
"IC" wrote in message
...
| This code used to work when it was pointed to a single cell. I can't

get
it
| to work now that M2:N2 are merged. Any ideas how I can get round

this?
| Unfortunately I need the cells merged :-(
|
| Private Sub Worksheet_Change(ByVal Target As Excel.Range)
| ' If Target.Count 1 Then Exit Sub
| If Target.Address = "$M$2:$N$2" Then
| If IsEmpty(Me.Range("M2:N2")) Then
| Me.ComboBox1.Enabled = False
| Else
| Me.ComboBox1.Enabled = True
| End If
| End If
| End Sub
|
| Any suggestions will be gratefully received
|
| Ian
|
|



--

Dave Peterson