Supportnet / Forum / Tabellenkalkulation

Hi Leute! Kann man den Autofilter auf den Wert den ich in eine Zelle eingebe. Genauer gesagt ich möchte in D21 einen Wert eingeben und die Spalte D25:D238 danach Filtern. Ich habe probiert das ganze per Makro rekorder aufzuzeichnen, Range("D23").Select Selection.AutoFilter Range("A20:I20").Select Selection.AutoFilter Range("D23:D238").Select ActiveWindow.SmallScroll Down:=-213 Selection.AutoFilter Selection.AutoFilter Field:=1, Criteria1:=">-7", Operator:=xlAnd ActiveWindow.SmallScroll Down:=-15 jedoch funktioniert das nur für den Wert -7. Wie kann ich das so ändern das sich der Filter immer auf den Wert bezieht den ich in D21 eingebe? Danke im Voraus AF

Hallo,

versuch es mal so

Selection.AutoFilter Field:=1, Criteria1:=">" & Range("D21").Value, Operator:=xlAnd

Gruß

Helmut

Hi!

Danke funktioniert perfekt. Kannst du mir vielleicht einen Tipp geben, mit welchen Büchern ich meine mageren VBA bzw. Excel Kenntnisse verbessern kann?

Gruß AF

Hi!

Funktioniert leider nur wen ich positive zahlen filtere. Gibt es vielleicht eine Möglichkeit es so zu gestalten, dass es für positive und negative Zahlen funktioniert?

Danke im Voraus

Gruß AF

Hallo AF,
versuch es mal mit dem Cote:


Option Explicit
Sub Autofilteraus()
Selection.AutoFilter
[A:A].SpecialCells(xlBlanks).Cells(1).Select ´ nächste leere Zelle in A
End Sub

Sub Autofilterein()
Range("D25:D238").AutoFilter Field:=1, Criteria1:=Range("D21").Value
Range("D26:D65536").Cells.SpecialCells(xlCellTypeVisible)(1).Select ´prüft D22 ob leer
If ActiveCell.Value = "" Then
Selection.AutoFilter ´Autofilter aus
End If
End Sub
Gruß
fedjo
Mustertabelle:http://www.netupload.de/detail.php?img=826d0e604218ad9407f2ac085e22...

Hi!

Danke habe es schon hinbekommen.

Gruß AF

• AutoFilter Hintergrundformat bei Auswahl
• autofilter mit vba
• Autofilter hört nach ca 100 zeieln auf Warum?
• Sortieren nach markierter Zelle wie Autofilter
• excel vba filter reset