Ich konnte mit folgendem Befehl viel Platz sparen:
With Sheets("Katalog")
UserForm1.cob_produkt.RowSource = "'Katalog'!" _
& .Range("A2:C" & .UsedRange.Rows.Count).Address
End With
Das Problem:
A2: A
A3: B
A4: -leer-
A5: D
A6: A
...usw.
Ergebnis wäre ja dann im Dropdownmenü: A,B, ,D,A
ich hätte aber gerne: A,B,D
und zweitens:
A2: A B2: 1000
A3: B B3: 1500
A4: -leer- B4: 1550
A5: D B5: 2000
A6: A B6: 1000
wenn ich nun B per Dropdownmenü auswähle, dann sollen nur: 1500 und 1550 in einem benachbarten Dropdownmenü zur Auswahl stehen...
Kann mir jemand helfen?
Vielen Dank, ihr Spezialisten...