Setze nächste makro ein, möchte aber das der Filter ab Zeile 10 lauft, eingabe bereich bleibt gleich.
habe schon probiert mit irow ohne erfolg
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells(1).Address = "$B$5" Then
Range("B5").CurrentRegion.AdvancedFilter _
Action:=xlFilterInPlace, _
CriteriaRange:=Range("B4:B5"), _
Unique:=False
End If
End Sub
Gruss
Karel