Blattschutz Excel auf meinem mac

Hallo ZeTroSpym,

Schau mal, ob ich dir mit dieser interessanten Frage helfen kann.

Ich vermute, dass im Endeffekt dein Anliegen
Schutz und Sicherheit in Excel betrifft. Wenn nicht, haben wir dann ein Kompatibilitätsproblem zwischen Mac und PC.

In diesem Fall würde ich dir zum Ersten empfehlen, deine Schule zu kontaktieren. Vielleicht kann dein*e Lehrer*in dir einen Workaround geben.

Bitte lass mich wissen, ob diese Information hilfreich ist. Bitte melde dich diesbezüglich gerner wieder und vergiss nicht, dass wir immer zur Verfügung stehen.

Vielen Dank und liebe Grüße,

Kyle

Hallo,

welches Passwort hast du denn vergessen? Das Passwort zum Öffnen? Dann schau mal, ob du im Bekanntenkreis jemand hast mit Excel for Mac oder Open Office. Vielleicht wird da der Schutz ignoriert.

Wenn es das Passwort für den Blattschutz ist, kannst du, falls du alle Zellen auswählen kannst, die Daten in eine neue Mappe kopieren.

Mit freundlichen Grüßen

Claus

- es sollen gewisse Zellen geschützt sein -->Blattschutz- es ist eine Gruppierung (Spalten) inbegriffen die auch mit Blattschutz funktionieren soll-die Datei soll von mehreren Leuten gleichzeitig bearbeitet werden können

Alles zusammen geht in Excel nicht.
<br />Andreas.
<br />

Hallo Wolle,

mit dem von Dir abgebildeten Code wird der Blattschutz aufgehoben und nicht gesetzt.

"Also soll vor dem Schließen geprüft weden, ob der Blattschutz für die betreffenden Spalten aktiviert ist. Wenn "ja" soll das Excel-Sheet geschlossen werden, wenn "nein" soll erst der Blattschutz aktiviert werden und das Sheet dann geschlossen werden."

Wenn generell der Blattschutz gesetzt sein sollte muss ja nicht abgefragt werden ob selbiger aktiv ist, es würde reichen den Blattschutz einfach zu setzen.

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Dim wks As Worksheet

For Each wks In ThisWorkbook.Worksheets

  wks.Protect Password:="Dein_PW"

 Next wks

End Sub

Dieser Code liegt dann in "DieseArbeitsmappe" und wird ausgeführt wenn die Mappe geschlossen wird. "Dein_PW" natürlich anpassen!

lg

Chris

Wenn generell der Blattschutz gesetzt sein sollte muss ja nicht abgefragt werden ob selbiger aktiv ist, es würde reichen den Blattschutz einfach zu setzen.

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Dim wks As Worksheet

For Each wks In ThisWorkbook.Worksheets

  wks.Protect Password:="Dein_PW"

 Next wks

End Sub

Dieser Code liegt dann in "DieseArbeitsmappe" und wird ausgeführt wenn die Mappe geschlossen wird. "Dein_PW" natürlich anpassen!

Nein, Nein, und Nein, so nicht.

Also ich bin eine berechtige Person, öffne die Datei, entferne den Blattschutz, dann speichere ich die Datei und mache sie einfach zu... und was nutzt nun Dein Code? Nix, der nächste User hat keinen Blattschutz gesetzt.

Du fragst den Blattschutz in Workbook_BeforeSave ab und dann entweder

a) gibst Du eine Meldung aus und setzt Cancel auf True, dann kann der User das selber machen oder

b) Du setzt den Blattschutz bei den entsprechenden Blättern (ggf. nicht allen) und lässt Excel speichern.

Und wenn man Cancel innerhalb einer Ereignisroutine auf True setzt, dann wird der weitere Code (in Excel) nach dem Verlassen selbiger nicht weiter ausgeführt. Das gilt für alle Ereignisroutinen die dieses Argument haben.

Nochmal bitte. ;-)

Andreas.