Ændring af VBA kode
Jeg har denne kode, som virker perfekt når mine ark ikke er arkbeskyttet. Nu er jeg blevet nødsaget at arkbeskytte (uden kode) 2 ark, så nu vil koden ikke rydde autofiltret i de beskyttede ark.Er der en VBA ekspert der kan hjælpe med at redigere koden så den også kan rydde de beskyttede ark?
Private Sub Workbook_BeforeClose(Cancel As Boolean)
For Each ws In ThisWorkbook.Worksheets
If ws.FilterMode = True Then
ws.ShowAllData
End If
Next ws
End Sub