Hallo Nest-eeekscha,
du hast nicht viele Einzelheiten genannt, deshalb wirst du das Makro wohl anpassen müssen. Ich gehe davon aus, dass die Auflistung in Zeile 1 beginnt, die Namen aus einer Spalte in die Listbox1 eingetragen werden sollen und die Tiere in eine Combobox1.
Private Sub ListBox1_Click()
With ComboBox1
.Clear
.AddItem Cells(ListBox1.ListIndex + 1, "O")
.AddItem Cells(ListBox1.ListIndex + 1, "V")
.AddItem Cells(ListBox1.ListIndex + 1, "AC")
.DropDown
End With
End Sub
Private Sub UserForm_initialize()
a = InputBox("In welcher Spalte stehen die Kundennamen?")
ListBox1.Clear
For i = 1 To Cells(Rows.Count, a).End(xlUp).Row
ListBox1.AddItem Cells(i, a)
Next i
End Sub
Gruß
Holger
Nest-eeekscha schrieb am 23.10.2009 18:51:42:
Noch folgende Anmerkung:
Tierart1 steht in Spalte O, Tierart2 steht in Spalte V, Tierart3 steht in Spalte AC.
Nest-eeekscha schrieb am 23.10.2009 18:42:58:
Hallo Holger,
also alle Tier-Arten eines Kunden stehen in einer Zeile in der Tabelle. Pro Zeile gibt es einen unterschiedlichen Kunden.
Die Zeilen werden mir in der Listbox im Userform angezeigt, allerdings möchte ich dass sobald ich einen Eintrag der Listbox (also einen Kunden markiere) automatisch in einer Combobox die Arten zur Tier-Auswahl stehen, die der Kunde auch hat.
Beispiel:
Kunde A aus Zeile 1 hat Hund und Katze
Kunde B aus Zeile 2 hat Pferd und Kuh
Kunde C aus Zeile 3 hat Meerschweinchen und Goldfisch
Wenn ich jetzt in meiner Userform eine Auswahl in der Listbox treffe, beispielsweise "Kunde A" dann soll in der Combobox als Auswahlmöglichkeit Hund, Katze stehen;; bei Auswahl KLunde B aus der Listbox soll in der Combobox Pferd, Kuh zur Auswahl stehen.
Hoffe du weißt was ich meine.
Liebe Grüße
Holger schrieb am 22.10.2009 10:43:41:
Hallo Nest-eeekscha,
im Prinzip geht alles. Du musst aber verraten, wie du verschienen Arten eines Kunden abrufen kannst. Wenn sie bereits in der ListBox stehen, macht ja die ComboBox keinen Sinn. Also wirst du diese Zuordnung woanders haben. Das musst du schon beschreiben, wenn dir geholfen werden soll.
Gruß
Holger
Nest-eeekscha schrieb am 20.10.2009 18:56:05:
Hallo,
ich habe in einer Userform eine Suchen-Schaltfläche.
Nun werden die Ergebnisse in einer Listbox der Userform ausgegeben.
Geht es, dass ich sobald ich auf einen Eintrag der Listbox klicke, automatisch eine Combobox mit Werden aus der Listbox gefüllt wird?
In der Tabelle stehen unterschiedliche Kunden.
Pro Kunde gibt es eine Zeile.
Jeder Kunde hat aber mehrere "Arten" (bspw. Hund, Katze, Maus).
Kann ich diese unterschiedlichen "Arten" mit Hilfe einer Combobox in der Userform anzeigen, sobald ich die Auswahl in der Listbox treffe und wenn ja, wie geht das?
Könnt ihr mir bitte helfen? Ihr würdet mir echt sehr weiterhelfen. |