Solved: Solved Zoom in if specific cells are selected

[KarlV]

Hi,

I've this code for zooming if cell D8 is selected. Cell D8 is a merged cell with data validation (dropdownlist). For some reason the code doesn't seem to work. If I choose an unmerged cell it seems to work alright. Please can anyone tell me what I'm doing wrong?



[VBA]Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$D$8" Then
ActiveWindow.Zoom = 125
Else
ActiveWindow.Zoom = 100
End If
End Sub
[/VBA]