ComboBox2 in Abhängigkeit von CB1

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Private Sub ComboBox1_Change() ' geschrieben von Klaus-Dieter Oppermann ' ComboBox2 in Abhängikeit füllen ' Variablen deklarieren Dim iSpalte As Integer ' aktuelle Spalte Dim iZiel As Integer ' letzte gefüllte zelle in aktueller Spalte Dim rng As String ' Range für Spaltendefinition iSpalte = ComboBox1.ListIndex + 2 ' aktuelle Spalte definieren rng = Chr(iSpalte + 64) & "65536" ' Range definieren iZiel = Worksheets("Tabelle2").Range(rng).End(xlUp).Row ' letzte gefüllte Zelle in aktueller Spalte ComboBox2.Clear ' alte Inhalte löschen ComboBox2.List = Range(Worksheets("Tabelle2").Cells(1, iSpalte), _ Worksheets("Tabelle2").Cells(iZiel, iSpalte)).Value ' neue Liste einlesen End Sub

Private Sub UserForm_activate() ' geschrieben von Klaus-Dieter Oppermann ' ComboBox 1 mit definierten Inhalten füllen ComboBox1.List = Worksheets("Tabelle2").Range("A2", "A" & _ Worksheets("Tabelle2").Range("A65536").End(xlUp).Row).Value ' Liste an Combobox übergeben End Sub

Guten Abend Thorsten,
erst mal vielen Dank für deine Mühe! Und Entschuldigung für mein spätes reagieren.
Der Fehler der UserForm kam durch das Einfügen der Codepasage... warum auch immer. Scheint aber mit "einfachen" aufziehen gelöst, oder?
Zu deinen Änderungen. Sieht auf jeden Fall deutlich ordentlicher, professioneller und strukturierter aus. Grundsätzlich sind deine Annahmen auch alle korrekt, bis auf das die "Bank" in keiner Abhängigkeit steht. Ja, in der Praxis komplett falsch, aber für diesen Fall erst mal als unabhängig anzusehen.
Der Grund warum ich die Spalte "Konto (alle)" angelegt habe, war auf einen Kommentar, der meinte das es eine Aufspaltung der Konten nicht braucht. Meiner Meinung nach ist es aber mit einer Trennung etwas einfacher.
Wie du dir dann richtig erschlossen hast, herrscht eine Abhängigkeit zwischen "Bänker" und "Konto". Wobei der "Bänker" das "Konto" bestimmt. Erstauswahl muss also "Bänker" sein.
Wobei ich mir jedoch nicht ganz sicher bin, ob deine Anordnung so Übersichtlich bleibt, wenn Bänker Hans z.B. 55 unterschiedliche Konten, usw. zugeordnet bekommen. Deswegen mein erster Impuls die Konten einfach (aber hässlich und unsauber) untereinander zu schreiben.
Resultat sind im Grunde dann zwei ComboBoxen die voneinander Abhängig sind ("Konto" von "Bänker") und eben diverse ComboBoxen die einfach die Werte aus den Tabellen (ohne Abhängigkeit/Sortierung) wiedergeben.
Ich hoffe du konntest mir folgen und ich habe alle deine Fragen beantworten können und keine Übersehen (oder gar Verwirrung ausgelöst :D).
Ansonsten einfach weiter Fragen :) Bin dir wirklich sehr dankbar für dein Engagement!
Viele Grüße!

Hi Klaus-Dieter,
und zwar deshalb, weil ich all meine vorherigen Überlegungen "über Board wefen kann"! :-)
Hätte nämlich ich mit allem recht gehabt, dann hätte man ganz viele Abhängigkeiten programmieren müssen.
Zumindest mir bleibt das jetzt zum Glück erspart :-)
Also hab ich all meine Tabellenänderungen wieder gelöscht, und als Basis gilt wieder deine gezeigte Bsp-Datei.
So, nun zu meiner neuen Idee (die erst mal nur die Tabellen "PI + SI" und "Sources & Anpassungen" betrifft)
1. Direkt nach jedem Öffnen (UND nur bei aktivierten Makros!) werden in Tabelle "PI + SI" die Spalten "Bänker", "Niederlassung", "Planer" usw aktualisiert.
Das heißt, alle Datenzeilen in den Spalten erhalten ihre zugehörigen Werte aus der Tabelle "Sources & Anpassungen".
Jetzt hättest du also die Wahl, ohne irgdwelche Abhängigkeit, in den schon gefüllten Spalten einen der verfügbaren Werte auszuwählen.
2. Spalte "Bänker" ist ja zur Zeit noch komplett leer.
Somit hast du auch - nicht - die Möglichkeit, in Spalte "Konto" einen Eintrag zu machen (Auswahl über Dropdown ist gar nicht möglich, weil noch nicht verfügbar)
Versuch es doch mal:
- trag irgdwo in Spalte Konto irgdetwas ein
...nach Drücken auf Enter ist dein Eintragsversuch sofort wieder gelöscht, und es erscheint ein Hinweis, dass hier Eingabe/Auswahl - nur dann - möglich ist, wenn in genau der Zeile vorher in Spalte "Bänker" eben einer der verfügbaren Bänker ausgewählt wurde
SOMIT HAST DU HIER SCHON MAL ABHÄNGIGKEIT1 (Kontonummer in Spalte Konto nur dann möglich, wenn vorher ein Bänker ausgewählt wurde)
3. So, nun wähl mal in Spalte "Bänker" einen der verfügbaren Bänker aus
JETZT werden - nur für die Nachbarzelle in Spalte "Konto" - genau die Kontonummern zur Verfügung gestellt, die vom zuvor ausgewählten Bänker bearbeitet werden.
UND DAMIT HAST JETZT ABHÄNGIGKEIT2 (in Spalte "Konto" immer nur die Kontonummern auswählbar, die vom Bänker, der in Nachbarzelle, gleiche Zeile steht, bearbeitet werden)
So, viel Reden, ohne Datei wenig Sinn :-) ...hier, teste mal
https://www.herber.de/bbs/user/156796.xlsm
ACHTUNG!!
In der jetzigen Version hab ich erst mal nur die Abhängigkeiten in den genannten Tabellen bearbeitet.
Dein Userform kann man zwar noch aufrufen, aber es werden noch nicht Werte an die Combo- , List-, Text-Boxen übertragen.
Eins nach dem Anderen!
Schau dir erst mal meine neue Datei an, teste in Ruhe.
Funktioniert, bezogen auf Abhängigkeit in den Tabellen alles, wie es soll?
Dann versuchen wir - deine nächste Frage.
Konnte ich helfen?
...ach so, wieso glaubst du, dass die Angabe deiner Excel-Version egal ist?...
Ciao
Thorsten

Beliebteste Forumthreads (12 Monate)

ComboBox2 in Abhängigkeit von CB1

14
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

300 Forumthreads zu ähnlichen Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

ComboBox2 in Abhängigkeit von CB1

14 Beiträge zum Forumthread Beiträge zu diesem Forumthread

300 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

14
Beiträge zum Forumthread

Beiträge zu diesem Forumthread