Code not working in Merged Cells

[tracktor]

The code below works perfectly. However, I need to merge the cells in column D with the cells in column E. When I do this the code does not work. I have tried to reference the cells in both columns but have had no luck. What do I need to do?

Here is my code

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

   Select Case Target.Address
        Case "$D$4", "$D$9", "$D$11", "$D$12"
            Call OpenCalendar
    End Select
    
End Sub

 

[Kaps_mr2]

simple .... avoid merged cells - they are an absolute pain !!!

Kaps

 

[tracktor]

I would if I could, but that would ruin the whole worksheet. Is there a way to allow the text in the column to the left to overflow to the columns to the right? If I can do that, then I don't need to merge the cells. Any suggestions?

 

[pcc]

if you select eg D4 and D5 then format>cells>alignment>centre across selection, that might do the trick