Blattschutz UND Autofilter bei Excel

Hallo!

Wie kann ich im Excel meine Daten gegen Eintragungen anderer mit dem Blattschutz schützen und trotzdem den Autofilter benutzen  ???
Dieser ist nämlich nach dem Schützen des Blattes außer Funktion  !!

Für hilfreiche Hinweise hierzu wäre ich euch dankbar!

Gruß
Saarfrank

Hallo,

im VBA-Editor (Alt+F11) kann für das Blatt die ScrollArea $1:$1 eingestellt werden (am beste mit einem Workbook oben - Makro). Somit kann auf die volle Breite gescrollt werden - wobei nur die Zeile 1 geändert werden kann.


Ciao


Fibo

Hi !

??? Und wie genau mach ich das???? Sooo gut bin ich nicht im Excell!

Ich hab festgestellt das es beim Excell 2003 ganz einfach funktioniert, beim Blatt schützen kann man festlegen was der Nutzer noch darf und da lässt sich abhaken Auto filter, so funktioniert dieser auch bei einem geschützten Blatt!

Auf meiner Arbeit hab ich aber ne ältere Excell version!

Gruß

Frank

Hallo,

1. Die Datei öffnen
2. Alt + F11 öffnet den VBA-Editor
3. Auf der linken Seite im Projekt-Explorer die entsprechende Datei auswählen VBAProjekt(Dateiname)
4. rechter Mausklick auf Diese Arbeitsmappe und Code
5. mittig oben von (Allgemein) auf Workbook klicken
6. rechts oben von (Deklaration) auf Open
7. nun solltest du folgendes sehen:

Private Sub Workbook_Open()
End Sub

8. ändere den Code wie folgt:

Private Sub Workbook_Open()
Bereich
End Sub

9.  rechter Mausklick auf Diese Arbeitsmappe und Einfügen/ Modul
10. rechter Mausklick auf das Modul und dann Code anzeigen
11. folgendes Makro eingeben (bzw. kopieren):

Sub Bereich()
Worksheets(Anschreiben).ScrollArea = $1:$1
'setzt den Scroll-Bereich fest (statt Anschreiben immer den Blattnamen einsetzen)

Application.Goto Reference:=Anschreiben!R4C1
'geht zur Startzelle - in diesem fall D4 (R4 - Zeile4 und C1 - Spalte1)

ActiveWindow.Zoom = 85
'stellt den Zoomfaktor ein (hier 85%)

End Sub

Wenn du nun das ganze speicherst und die Datei wieder öffnest werden die Änderungen aktiv.

Ciao


Fibo