ListFillRange
02.08.2006 16:01:54
stefanseevetal
Ich habe immer noch bzw. wieder ein Problem mit der ListFillRange-Eigenschaft der ComboBox.
Ich möchte ListFillRange flexibel zuweisen und mache eine Case-Unterscheidung. Wenn ich mit ".CurrentRegion.Address" arbeite, funktioniert es, aber nicht, wenn ich einen fixen Bereich zuweisen möchte. Wieso?
Ich möchte nicht mit ".CurrentRegion.Address" arbeiten, da es vorkommen kann, dass in dem Bereich für das ListFillRange (immer 10 Zellen einer Spalte) in ein paar Zellen keine Einträge sind und somit weiter unten stehende Einträge in dem Bereich nicht mit berücksichtigt werden.
So geht es (aber nur, wenn alle Zellen im Bereich Einträge enthalten):
DropDownMT.ListFillRange = "Eingabebereiche!" & Sheets("Eingabebereiche").Range("H3").CurrentRegion.Address
So nicht:
Select Case Anlagenteil
Case "Verdichter"
DropDownET.ListFillRange = "Eingabebereiche!" & Sheets("Eingabebereiche").Range("H3:H13")
Case "Pumpe"
DropDownET.ListFillRange = "Eingabebereiche!" & Sheets("Eingabebereiche").Range("H19:H29")
Case "Behälter"
End Select
Hat da jemand vielleicht eine Idee, was ich falsch mache?
Danke und Gruß,
Stefan