von Access aus per VBA Excel-Dokument schützen
17.12.2003 22:39:52
Alex_B
Habe folgendes Problem:
Ich exportiere von Access aus ein Tabelle in ein xls-Dokument.
Dies muss ich nun von Access aus mit VBA mit einem Dokumentschutz versehen und zwar so, dass niemand, der diese Excel-Tabelle öffnet die 1.Spalte verändern kann, ohne den Dokumentschutz mit dem Passwort aufzuheben.
Habe folgendes probiert:
---------------------------------------------------------
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel8, "Texte", "c:\Windows\desktop\tabelle.xls", False, ""
Set ExcelBlatt = GetObject("c:\Windows\desktop\tabelle.xls")
ExcelBlatt.worksheets(1).Columns("A:A").Locked = True
ExcelBlatt.ActiveSheet.Protect Password:="test", DrawingObjects:=False, Contents:=True, Scenarios:=False
---------------------------------------------------------
Leider tut sich da überhaupt nix.
Wenn ich am Ende ExcelBlatt.Save einfüge, öffnet es mir nur Excel, aber nicht die Datei.
Kann mir jemand helfen, bzw. nen Tipp geben??
Danke
Anzeige