VBA AutoFilter Auswahl aus Liste füttern

Bild

Betrifft: VBA AutoFilter Auswahl aus Liste füttern
von: WalterK
Geschrieben am: 27.09.2015 16:52:32

Schönen Sonntag,
ich möchte die Auswahl für den Autofilter aus einer Liste füttern:
die Liste befindet sich im Bereich K3:K?
Und das ist mein Problem, die Liste ist unterschiedlich lang: manchmal stehen Einträge von K3:K10, dann wieder von K3:K4 usw.
Wie muss man das im Code anführen?
Besten Dank für Eure Hilfe, Servus Walter

Bild

Betrifft: AW: VBA AutoFilter Auswahl aus Liste füttern
von: Hajo_Zi
Geschrieben am: 27.09.2015 16:54:54
ermittle die letzte Zelle in Spalte K
LoLetzte = IIf(IsEmpty(Cells(Rows.Count, 11)), Cells(Rows.Count, 11).End(xlUp).Row, Rows.Count)


Bild

Betrifft: AW: VBA AutoFilter Auswahl aus Liste füttern
von: WalterK
Geschrieben am: 27.09.2015 17:46:55
Hallo Hajo,
mein Codeteil sieht jetzt so aus:
LoLetzte = IIf(IsEmpty(Cells(Rows.Count, 11)), Cells(Rows.Count, 11).End(xlUp).Row, Rows.Count)
wksTest.Range("$A$2:$M$23").AutoFilter Field:=11, Criteria1:=wksTest.Range("K3:K" & LoLetzte), Operator:=xlFilterValues
so funktionierts aber nicht!
Wie muss es bei Criterial1 richtig lauten?
Besten Dank und Servus, Walter

Bild

Betrifft: AW: VBA AutoFilter Auswahl aus Liste füttern
von: Hajo_Zi
Geschrieben am: 27.09.2015 17:48:34
Du kannst nur einen Wert zuweisen, soweit mir bekannt.
Gruß Hajo

Bild

Betrifft: AW: VBA AutoFilter Auswahl aus Liste füttern
von: WalterK
Geschrieben am: 27.09.2015 18:15:19
Danke Hajo,
dann muss ich einen anderen Weg finden.
Schönen Sonntag noch, Servus, Walter

Bild

Betrifft: AW: VBA AutoFilter Auswahl aus Liste füttern
von: Gerd L
Geschrieben am: 27.09.2015 19:25:33
Servus Walter!

Sub b()
Dim LoLetzte As Long
Dim wksTest As Worksheet
Set wksTest = Tabelle2 'Anpassen
LoLetzte = IIf(IsEmpty(Cells(Rows.Count, 11)), _
Cells(Rows.Count, 11).End(xlUp).Row, Rows.Count)
wksTest.Range("$A$2:$M$23").AutoFilter Field:=11, _
Criteria1:=Array(Application.Transpose(wksTest.Range("K3:K" & LoLetzte))), _
Operator:=xlFilterValues
End Sub
Aber, warum filterst du nicht nach "nicht leere" in Spalte K ?
Gruß Gerd

Bild

Betrifft: AW: VBA AutoFilter Auswahl aus Liste füttern
von: WalterK
Geschrieben am: 27.09.2015 19:42:45
Hallo Gerd,
besten Dank, funktioniert wie gewünscht.
Auf die Idee nach den "nicht leeren" zu Filtern bin ich gar nicht gekommen. Das wäre ja noch einfacher.
Schönen Abend noch und Servus, Walter

 Bild

Beiträge aus den Excel-Beispielen zum Thema "VBA AutoFilter Auswahl aus Liste füttern"