KarlV
05-20-2009, 08:09 AM
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?
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
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?
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