Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
'Hierdurch wird bei Aktivierung von Dropdownzellen Dropdown sofort automatisch aufgeklappt:
If ActiveCell.Validation.InCellDropdown = False Then Exit Sub
Application.SendKeys ("%{UNTEN}")
End Sub
Unter Excel 2010 funktioniert das nun das nun aber nicht mehr. Gibt es eine andere Lösung, die möglichst auch abwärtskompatibel ist?