Ich möchte in meiner Tabelle einen Autofilter setzen.
Mein Code:
Sub xxx()
With AKB
.Range(.Cells(8, 1), .Cells(LastRow(AKB), LastCol(AKB))).AutoFilter
End With
End Sub
.Da passiert aber gar nix, wenn ich den Code laufen lasse.
Ich habe den Range im Direktbereich getestet, der Bereich, der gefiltert werden soll, scheint zu stimmen:
?akb.Range(akb.Cells(8, 1), akb.Cells(LastRow(AKB), LastCol(AKB))).Address
$A$8:$L$132
Wenn ich das Filtersetzen mit dem Macrorecorder festhalte, wird Folgendes aufgezeichnet:
Sub Makro1()
'' Makro1 Makro
Application.Goto Reference:="R8C1:R132C12"
Selection.AutoFilter
End Sub
Brauche ich in meinem Code das Selection oder weshalb klappt das so nicht?Gruss, Peter