wei kann ich in Excel eine ganze Mappe schützen ohne Passwort, so das der Benutzer das Inhalt sieht aber bearbeiten bleibt gesperrt.?
Danke
gruss
dark
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Cancel = SaveAsUI
End Sub
Private Sub Workbook_Open()
Select Case Environ("username")
Case "testuser" 'ist der Berechtigte
Case Else 'alle anderen
ThisWorkbook.ChangeFileAccess xlReadOnly
End Select
End Sub
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen