Ich möchte im definierten Bereich "_Daten" einen Autofilter setzen. Falls er schon gesetzt ist, möchte ich alle Daten sehen.
Mit untenstehendem Code passiert in meiner Tabelle nichts. Was fehlt oder ist falsch?
Gruss, Peter
?range("_Daten").Address
$A$20:$CJ$517
Sub Autofilter_setzen()
With Worksheets("K_Anlagen")
If .AutoFilterMode = True Then
.ShowAllData
Else
Range("_Daten").AutoFilter
End If
End With
End Sub