Herbers Excel-Forum - das Archiv
Schreibschutz per VBA aufheben
Betrifft: Schreibschutz per VBA aufheben
von: Popper
Geschrieben am: 23.02.2005 10:57:47
HI!
Habe folgendes Problem:
Ein Makro soll eine Datei öffnen. Die zu öffnende Datei ist mit einem Schreibschutz versehen. Die Prozedur soll automatisch den Schreibschutz mittels Passwort aufheben und weiterlaufen. Wie könnte solche eine Prozedur aussehen?
Kann mir vielleicht jemand helfen. Vielen Dank
Popper
Betrifft: AW: Schreibschutz per VBA aufheben
von: Marcl
Geschrieben am: 23.02.2005 11:09:18
Sub ...()
ActiveSheet.Unprotect "DeinPaswort"
End Sub
Gruß
Marcl
Betrifft: funktioniert nicht richtit...
von: Popper
Geschrieben am: 23.02.2005 11:16:49
vielen dank, jedoch klappt das nicht, vielleicht mache ich auch nur einen fehler bei der anwendung. der befehl klappt, um den schutz von sheets aufzuheben, jedoch möchte ich den schreibschutz einer ganzen datei beim öffnen aufheben. die aufforderung beim öffnen zur eingabe des passwortes soll durch das makro erfüllt werden
Betrifft: AW: funktioniert nicht richtit...
von: Ralf (Schwabenland)
Geschrieben am: 23.02.2005 11:23:37
Hallo Popper,
so:
Workbooks.Open Filename:="c:\test.xls", Password:="test"
Gruß
Ralf
Betrifft: AW: funktioniert nicht richtit...
von: Bernd
Geschrieben am: 23.02.2005 11:24:32
hi,
müsste heissen:
ActiveSheet.Unprotect password:="DeinPaswort"
für entsperren und
ActiveSheet.Protect password:="DeinPaswort"
für sperren
gruss bernd