In einer Excel-Datei habe ich den Filter für den User gesperrt, damit er nur die Zeilen sieht, welche das Kriterium der in Feld C2 erfassten Zahl betreffen. In Excel 2000 hat dies mit dem Code
Dim xy As Variant
ActiveSheet.Unprotect Password:="Passwort"
Range("C2").Select
xy = ActiveCell.Value
Selection.AutoFilter Field:=5, Criteria1:=xy
ActiveSheet.Protect Password:="Passwort", DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
bestens funktioniert. Nun haben wir aber das Problem, dass wir User haben, welche Excel 2007 verwenden. Und dort ist leider der Filter weiterhin offen trotz dieses Codes.
Hat jemand von euch eine Lösung, wie ich den Code anpassen kann, damit er in beiden Versionen funktioniert?
Ganz herzlichen Dank schon im voraus!
Herzliche Grüsse
Andrea