Dropdown mit einem Klick öffnen
#1
Hallo, da mir bei meinem letzten Problem so gut geholfen wurde versuche ich es gleich noch mal.  :28:

Ich habe einige Dropdown Menüs. Leider muss jedes mal extra das Feld und dann der Pfeil angeklickt werden.

Gibt es hier eine Möglichkeit das das nicht mehr nötig ist? Als Beispiel mit den Feldern E8; W11; W13.

Bitte sagt auch dazu in welches Modul ich den VBA Code einfügen muss, ich bin echt noch ein Einsteiger ;)

Danke
Top
#2
Moin!
Wenn Du den Zellendropdown der Datenüberprüfung meinst:
das "Ausklappen" wird ja durch die Tastenkombination Alt+Pfeil unten ausgelöst.
Dies kann man per .SendKeys simulieren.
Ins Klassenmodul der Tabelle
(Rechtsklick auf Tabellenreiter, Code anzeigen)
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("E8,W11,W13")) Is Nothing Then
  Application.SendKeys ("%{Down}")
End If
End Sub

Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
[-] Folgende(r) 1 Nutzer sagt Danke an RPP63 für diesen Beitrag:
  • Revej
Top
#3
Danke, funktioniert super.  :35:
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste