AW: Schreib-/Lesekennwort
Klaus
Hallo Klaus,
mit VBA gibt es Möglichkeiten der Verhinderung.
Öffne die betroffene Arbeitsmappe und öffne dann den VBA-Editor (Alt+F11).
Jetzt machst du einen Doppelklick oben links im Projektfenster auf "DieseArbeitsmappe" und kopierst folgenden Code in das rechte Code-Fenster:
Private Sub Workbook_Activate()
With Application.CommandBars("Worksheet Menu Bar").Controls("Datei") _
.Controls("Speichern unter...")
'Speichern unter... deaktivieren
.Enabled = False
End With
End Sub
Private Sub Workbook_Deactivate()
With Application.CommandBars("Worksheet Menu Bar").Controls("Datei") _
.Controls("Speichern unter...")
'Speichern unter... wieder aktivieren
.Enabled = True
End With
End Sub
Jetzt die Arbeitsmappe speichern. Immer wenn diese Mappe jetzt aktiviert ist, ist der Punkt "Speichern unter..." deaktiviert. Wenn die Mappe deaktiviert ist. z.B beim Wechsel auf eine andere Mappe, ist der Punkt wieder aktiviert.
Der Nachteil bei dieser Methode ist, das man die Mappe halt nur noch unter dem Punkt "Speichern" unter dem Originalnamen speichern kann.
Aber vielleicht ist das bei euch ja auch so gewollt.
Wenn die betroffene Person allerdings Ahnung von VBA hat , kann er diese Sache rückgängig machen. Um das zu verhindern, klicke unter VBA das Projekt an und gehe dann auf "Extras/Eigenschaften von VBAProjekt..." . Klicke auf den Reiter "Schutz", aktiviere "Projekt für die Anzeige sperren" und vergib dann ein Passwort. Mappe speichern und schließen. Nach dem Öffnen der Mappe ist ohne Passwort der Zugriff auf den VBA-Code nicht mehr möglich!
Gruß Klaus