In geschützten Ordner einfügen
Hallo zusammen
Habe mir folgendes Makro erstellt
Range("A13:C13").Select
Selection.Copy
Workbooks.Open Filename:= _
"C:\Dokumente und Einstellungen\Dateien\Exeltabellen\Speichersicherung.xls"
ActiveSheet.Unprotect "neinnein"
Range("A" & Range("A65536").End(xlUp).Row + 1).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ActiveSheet.Protect "neinnein"
ActiveWorkbook.Save
ActiveWindow.Close
Range("A13").Select
End Sub
Wenn ich versuche die Datei Speichersicherung mit einem Passwort zu schützen z.b.(ActiveSheet.Unprotect "neinnein") bekomme ich immer eine Fehlermeldung !
Wie müsste das Makro aussehen damit die Daten in einen Passwortgeschützten Ordner eingefügt werden?
Mit freundlichen Grüßen
Hans
Antwort schreiben
Antwort 1 von coros vom 26.03.2019, 07:52 Options
Hallo Hans,
so ganz komme ich mit Deiner Beschreibung nicht zurecht.
Was hat denn der Blattschutz mit einem geschützten Ordner zu tun?
Funktuioniert den das was Du vor hast wenn kein Blattschutz gesetzt ist?
Meinst Du wirklich einen geschützten Ordner?
Wenn ja, wie ist denn der Ordner geschützt?
Wie Du siehst, eine ganze Menge noch offnener Fragen.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
Antwort 2 von yxc vom 26.03.2019, 14:15 Options
Hallo und guten ``Morgen``
Habe mir ein Makro aufgezeichnet, das mir eine Abrechnung ausdruckt.
Jets möchte ich es wie folgt erweitern.
Vor dem ausdrucken sollen die Zellen A13-D13 kopiert werden, und die Werte in einer anderen Datei ( Blatt) in einem anderen Ordner untereinander gespeichert werden. Diese Datei (Blatt) soll geschützt sein so das sie nicht von anderen Personen geändert werden kann.
Mein erstelltes Makro funktioniert nur ohne Passwort.
Besten Dank für dein Interesse, an meinen Anliegen.
Hans
Antwort 3 von coros vom 26.03.2019, 14:52 Options
Hallo Hans,
gehe ich recht in der Annahme, dass der von Dir geschriebene Bereich jeweils in eine separate Datei eingefügt wird und gespeichert werden soll? Oder was hat das mit Deiner Aussage
Zitat:
Vor dem ausdrucken sollen die Zellen A13-D13 kopiert werden, und die Werte in einer anderen Datei ( Blatt) in einem anderen Ordner untereinander gespeichert werden.
sonst auf sich. Ist etwas schwer verständlich.
Was soll denn nun geschützt werden, das Tabellenblatt oder die Datei?
Was hat das mit dem in Deiner Eingangsfrage angesprochenen geschützten Speicherordner auf sich?
Beantworte wenn möglich die Fragen.
Danke.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
Antwort 4 von yxc vom 26.03.2019, 18:33 Options
Hallo
Habe mich wohl sehr unklar ausgedrückt
Deine Annahme ist richtig.
Der Bereich A13-D13 soll kopiert und in eine andere Datei gespeichert werden.
Geschütz werden soll dann das Tabellenblatt wo die Daten eingefügt wurden.
Diese Datei soll durch das Makro auch gespeichert und geschlossen werden!
Habe wohl die Begriffe Ordner , Datei und Tabellenblatt etwas durcheinander gebracht sorry!
Mit freundlichen Grüßen
Hans
Antwort 5 von yxc vom 08.04.2019, 14:31 Options
Hallo und Frohe Ostern.
Konnte mein Problemchen noch nicht lösen!
Wenn ich es noch nicht verständlich beschrieben habe werde ich es nachholen sobald sich jemand dessen annimmt.
Mit freundlichen Grüßen
Hans