Office: 2. Dropdown mit automatischer Anzeige des 1. Listeneintrages

Hallo zusammen, zuerst einmal: "Man bin ich froh, dass ich dieses Forum gefunden habe. Hat mir wirklich schon extrem weiter geholfen".

Doch nun ganz fix zu meiner Frage:

Kann man einstellen ( und wenn ja wie ), dass sich in einem 2. abhängigen DD automatisch der 1. Eintrag der neuen DD-Liste öffnet.

Danke im voraus

Uwe

 

Hi Uwe,

das ist nur per VBA möglich. Kopiere folgenden Code ins Codemodul von Tabelle1:

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim rngZelle As Range
    If Target.Address = "$A$1" Then
        Set rngZelle = Range("A5:C5").Find(Target, lookat:=xlWhole)
        If Not rngZelle Is Nothing Then
            Target.Offset(0, 1) = Range(rngZelle.Address).Offset(2, 0)
        Else
            Target.Offset(0, 1).ClearContents
        End If
    End If
    Set rngZelle = Nothing
End Sub

Bis später,
Karin

 

Hallo Karin,

vielen Dank für die schnelle Antwort. Klappt super. Jetzt habe ich leider ein kleines weiteres Problemchen. Der Code belegt automatisch direkt das nächste freie Feld. Kann man das auch auf eine bestimmte Zelle steuern (sieht im gesamten Blatt sonst "doof" aus)?

Danke nochmal

Uwe

 

Hi Uwe,

ich habe den Code genau so geschrieben wie deine zuerst hochgeladene Arbeitsmappe aufgebaut ist - das zweite DropDown-Listenfeld befindet sich in der Nachbarzelle. Wenn es sich nun nicht in der Nachbarzelle sondern in der übernächsten befindet, dann ändere diesen Codeteil Target.Offset(0, 1) in diesen Target.Offset(0, 2).

Bis später,
Karin