makro spørgsmål.

Public Sub ShowAllFilterData()
    Dim wks As Worksheet
    On Error Resume Next
    For Each wks In ActiveWorkbook
        wks.ShowAllData
    Next wks
    Set wks = Nothing
End Sub

How - ovenstående nulstiller blot alle filtrene - fjerner intet.

den skal fjerne autofilter hvis slået til i samtlige ark i mappen.

er der virkelig ingen der hjælpe mig ?

Jojo - rolig nu :-)

Public Sub RemoveAllAutoFilters()
    Dim wks As Worksheet
    For Each wks In ActiveWorkbook.Worksheets
        If wks.AutoFilterMode Then
            wks.Select
            Selection.AutoFilter
        End If
    Next wks
    Set wks = Nothing
End Sub

det er jo smukt :)

jeg håber jeg kommer til at forstå vba en dag.
men det er lidt svært, så i hører nok fra igen inden længe.

tak for det;)