Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

ComboBox2 in Abhängigkeit von ComboBox1 befüllen
#11
(16.02.2020, 10:01)CrazyCat schrieb: Ralf, wie würdest du es besser machen?

Ich würde zunächst eine "intelligente" Tabelle erstellen, die ich DB genannt habe:

AB
1StadtMA
2BerlinKarsten
3BerlinOlaf
4BerlinInes
5LeipzigTanja
6LeipzigSabine
7LeipzigRene
8HannoverErwin
9HannoverMax
10HannoverIlka
11ErfurtKlaus
12ErfurtEva
13ErfurtHeidi

Dann bediene ich mich der Mittel eines aktuellen Excel:


Dialog UserForm1
Option Explicit 

Private Sub UserForm_Initialize()
ComboBox_Ort.List = WorksheetFunction.Unique( _
  Tabelle1.ListObjects("DB").ListColumns(1).DataBodyRange)
End Sub

Private Sub ComboBox_Ort_Change()
With Tabelle1.ListObjects("DB")
  .Range.AutoFilter 1, ComboBox_Ort.Text
  ComboBox_Name.List = .ListColumns(2).DataBodyRange.SpecialCells(xlCellTypeVisible).Value
End With
End Sub

Falls Dein Excel noch nicht über EINDEUTIG() verfügt, finden sich andere Lösungen.
Deine Datei überarbeitet zurück.

Gruß Ralf


Angehängte Dateien
.xlsm   Listobject.xlsm (Größe: 18,55 KB / Downloads: 3)
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)
Antworten Top
#12
@Ralf
Der Dateianhang von dir funktioniert wie er soll.

Füge ich den betreffenden Code angepasst bei mir im (Komplett-) Formular ein, dann kommt "Laufzeitfehler 9 Index außerhalb des gültigen Bereiches".

Was habe ich geändert?
Code:
Private Sub UserForm_Initialize()

Habe ich weggelassen, da dies schon vorhanden ist.
Antworten Top
#13
@Ralf
ALLES FUNKTIONIERT  :18:

Vielen Dank!

Der Fehler lag bei mir!
Die Tabelle in welcher lag, war bei mir Tabelle 5 und nicht Tabelle 1  :22:
Antworten Top


Gehe zu:


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