Salute,
ich habe eine Excel-Mappe mit kennwortgeschütztem Blatt. Die darin enthaltene Liste sollte auch ohne Kennwort sortierbar bleiben. Wie kann man das machen?
Läßt sich das Kennwort via Makro einfügen?
Falls das mit Kennwortschutz nicht geht: Wie bringe ich dem Sortiermakro bei, anschließend (die Sortierung verlangt, daß alles markiert wird) wieder nur die zuvor markierte Zelle auszuwählen?
Wär toll, wenn Ihr da ein paar Tipps hättet
Danke schon mal
Hanno
Hallo Hanno,
ich habe eine Excel-Mappe mit kennwortgeschütztem Blatt. Die
darin enthaltene Liste sollte auch ohne Kennwort sortierbar
bleiben. Wie kann man das machen?
Du kannst beim Mappenschutz einstellen, was der Benutzer alles tun darf. Da gibts auch einen Punkt Sortieren. Wenn du aber sortieren musst, musst du ja auch die Daten markieren können. Deshalb musst du auch die Zellen auswählen können (die ersten zwei Kästchen müssen also auch angehakt sein). Wenn du Fragen dazu hast, bitte melde dich noch mal.
Gruß Alex
Klappt nicht (keine Lösung)
Hallo Alex,
vielen Dank für Deine Hilfe. Leider jedoch komme ich damit nicht weiter:
ich habe eine Excel-Mappe mit kennwortgeschütztem Blatt. Die
darin enthaltene Liste sollte auch ohne Kennwort sortierbar
bleiben. Wie kann man das machen?
Du kannst beim Mappenschutz einstellen, was der Benutzer alles
tun darf. Da gibts auch einen Punkt Sortieren. Wenn du
aber sortieren musst, musst du ja auch die Daten markieren
können. Deshalb musst du auch die Zellen auswählen können (die
ersten zwei Kästchen müssen also auch angehakt sein). Wenn du
Fragen dazu hast, bitte melde dich noch mal.
Klappt nicht: Excel läßt das Sortieren auch dann nicht zu, wenn beim Blattschutz „Gesperrte auswählen“ und „Sortieren“ ausgewählt waren (Fehlermeldung: „Das Blatt ist geschützt! Heben Sie den Blattschutz auf, indem Sie…“). Scheint ein Bug zu sein.
Abgesehen davon sollte die erste Option („Gesperrte auswählen“) nicht gewählt sein, damit man bei der Dateneingabe gleich zum nächsten relevanten Feld springt (also die gesperrten Zellen überspringt).
Hast Du noch eine Idee?
Nochmals besten Dank
Hanno
ich habe eine Excel-Mappe mit kennwortgeschütztem Blatt. Die
darin enthaltene Liste sollte auch ohne Kennwort sortierbar
bleiben. Wie kann man das machen?
Läßt sich das Kennwort via Makro einfügen?
Falls das mit Kennwortschutz nicht geht: Wie bringe ich dem
Sortiermakro bei, anschließend (die Sortierung verlangt, daß
alles markiert wird) wieder nur die zuvor markierte Zelle
auszuwählen?
Hi Hanno,
Respekt, scheinst eine wunderbare Frage gestellt zu haben wenn du schon für die Frage einen Stern bekommst 
Zur Anfrage, fühle mich heute nicht wohl und mache mal nen faulen.
Zeichne dir ein Makro auf indem du den Bereich markierst und sortierst.
In der Hilfe zu Vba findest du unprotect und protect beschrieben.
In den Code fügst du noch anfangs ein
Dim Merker as Range
Merker=activecell
Activesheet.unprotect password:=„geheim“
Jetzt dein Sortiercode
Activesheet.protect password:=„geheim“, hier noch welche Szenarios usw. du schützen willst
Merker.Select
Wenn du nicht klarkommst, poste hier deinen Gesamtcode.
Gruß
Reinhard
Kleine Änderung, dann gehts! Danke
ich habe eine Excel-Mappe mit kennwortgeschütztem Blatt. Die
darin enthaltene Liste sollte auch ohne Kennwort sortierbar
bleiben. Wie kann man das machen?
Läßt sich das Kennwort via Makro einfügen?
Falls das mit Kennwortschutz nicht geht: Wie bringe ich dem
Sortiermakro bei, anschließend (die Sortierung verlangt, daß
alles markiert wird) wieder nur die zuvor markierte Zelle
auszuwählen?
Hi Hanno,
Respekt, scheinst eine wunderbare Frage gestellt zu haben wenn
du schon für die Frage einen Stern bekommst 
Ja, komisch… Aber nett |-)
Zur Anfrage, fühle mich heute nicht wohl und mache mal nen
faulen.
Zeichne dir ein Makro auf indem du den Bereich markierst und
sortierst.
In der Hilfe zu Vba findest du unprotect und protect
beschrieben.
In den Code fügst du noch anfangs ein
Dim Merker as Range
Merker=activecell
Activesheet.unprotect password:=„geheim“
Jetzt dein Sortiercode
Activesheet.protect password:=„geheim“, hier noch welche
Szenarios usw. du schützen willst
Merker.Select
Vielen Dank! Das mit password:=… kannte ich noch nicht. Klappt bestens. Doch bei Merker = ActiveCell bekomme ich immer eine Fehlermeldung. Ich habe hierzu inzwischen folgendes ausgeknobelt:
Dim Merker as Sting
Merker = ActiveCell.Address
...
Range(Merker).Select
Insgesamt klappt nun alles, wie’s soll (abgesehen davon, daß ich beim Tippen dieser Zeilen wahnsinnig werde: jeder vierte, fünfte Tastnanschlg wrd nihterkant! Ist nur im IE7 so, beim Firefox klappts ganz normal.)
Danke schön und Grüße
Hanno