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