Increasing the font size in pull down list

[BurkeDad]

I have looked and researched and I have found nothing that says it can or cannot be done. In 2007, are you able to increase the font size in the pull down lists?

 

[grizz]

If your drop down is in A1 this will increase when your drop down is clicked on and will return to regular font when another cell is clicked on

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Address = "$A$1" Then
    ActiveWindow.Zoom = 120
  Else
    ActiveWindow.Zoom = 100
  End If
End Sub