Office: (Office 2010) Bei Dropdown den ersten Wert anzeigen.

Hallo an alle und ein gesundes neues Jahr,

ich muss mich leider mal wieder melden. Nachdem ich in der Suchfunktion nicht füdnig geworden bin, glaube ich fast, dass mein Problem gar keines ist. Denn nicht ein Eintrag habe ich dazu gefunden. Sollt ich etwas übersehen haben bitte entschuldigen und darauf verlinken.

Also, ich habe ein Dropdownfeld, in dem ich je nach Schichtzeit eine unterschiedliche Anzahl und Reihenfolge von Namen habe. Das ist nicht das Problem.
Aber wenn ich das Dropdownfeld öffne, steht der Bildlaufbalken irgendwo und der blaue Auswahlbalken steht ganz oben. Die Namen stehen aber noch über dem blauen Balken Nicht sichtbar. Ich muss dann erst den Bildlaufbalken hoch ziehen, damit ich die Namen sehe und auswählen kann.

Das finde ich lausig. Im Internet gibt es zwar dieses "Problem" aber das wird meistens mit: Haken bei "leere Zellen ignorieren" rausnehmen erklärt.
Die funktioniert bei mir aber nicht.

Ich habe den Quellbereich als "Namensliste" definiert.

Gruß
lincoln
Berlin

 

Hi Lincoln,

so richtig verstehe ich nicht was du meinst - lade doch mal deine Mappe hoch, damit man es sich mal ansehen kann.

Bis später,
Karin

 

Hallo Karin,
vielen Dank für das schnelle Hilfsangebot.
Das blaue Feld ist das Dropdownfeld. Nach anklicken der Togglebuttons mit den Namen, die an der Schicht teilnehmen, wird nun ein Schichtleiter aus diesen Namen ausgewählt (blaues Feld). Ich möchte einfach, das der erste Name oben steht und ich dann im Bedarfsfall runterscrolle.

Gruß
lincoln

 

Hi Lincoln,

deine Gültigkeitsliste ist komplett leer.

Bis später,
Karin

 

Entschuldige bitte.
Dann habe ich das nicht klar formuliert.
Du musst erst die Namenbutton drücken. Da immer verschiedene Personen teilnehmen ist es egal wer teilnimmt. ABER einer von denen ist Schichtführer.

 

1. Ergänze alle Codes der ToggleButton durch die rot markierte Zeile (Name des ToggleButton jeweils anpassen!!)

Code:

Private Sub ToggleButton1_Click()
ToggleButton1.Caption = Sheets("Schichtbericht").Range("ah11").Value
[B][COLOR=#ff0000]Eintrag ToggleButton1[/COLOR][/B]
End Sub

und ergänze außerdem folgende Prozedur im Codemodul des Tabellenblattes:

Code:

Sub Eintrag(tgButton As ToggleButton)
    If tgButton Then
        tgButton.TopLeftCell.Offset(0, 7) = tgButton.Caption
    Else
        tgButton.TopLeftCell.Offset(0, 7).ClearContents
    End If
End Sub

Sie wird von jedem ToggleButton aufgerufen und schreibt in Spalte AI jedeils den Namen wenn ein ToggleButton aktiviert wurde.


2. Ändere die Formel in AF7 bis AF27 mit Bezug auf Spalte AI:

{=WENNFEHLER(WENN(ZEILE(A1)>ANZAHL2($AI$7:$AI$28);"";INDEX($AI:$AI;KKLEINSTE(WENN(AI$7:AI$28<>"";ZEILE($7:$28));ZEILE(A1))));"")}

sodass die ausgewählten Namen lückenlos aufgelistet werden.


3. Definiere einen Namen (z.B. Auswahl) und gib unter "Bezieht sich auf" diese Formel ein:

=Schichtbericht!$AF$7:INDEX(Schichtbericht!$AF$7:$AF$27;Schichtbericht!$AF$5;1)

Der Bereich dieses Namens passt sich automatisch an die Anzahl an vorhandenen Werten an.


4. Gib in der Güligkeitszelle D7 dieses als Quelle an:

=Auswahl


Bis später,
Karin

 

Liebe Karin,

Zunächst einmal vielen Dank für die blitzschnelle Hilfe.

Sei mir bitte nicht böse, wenn ich nur einen Teil deiner Lösung benutze. Denn Punkte 1 und 2 werden ja schon realisiert in den Feldern AF7:AF28. Allerdings nicht so schön und "Programmierer like" wie es deine Lösung zu sein scheint, aber ich brauche hin und wieder Ergebnisse in Zellen zur Visualisierung um nachvollziehen zu können, was gerade berechnet wurde.

Was aber zur Lösung meines Problems geführt hat, waren Punkte 3 und 4. Das läuft super. Vielen Dank.
Ich möchte jetzt nicht klugscheißen, aber obwohl du in der Formel zwei klitzekleine Felerleinchen eingebaut hast, habe ich den Test bestanden.
(Leerzeichen bei ...$AF$7:$ AF$27... und die 27 -> 28).

Also wie gesagt, bitte nicht böse sein.

Vielen Dank
Lincoln
Berlin