Thema Datum  Von Nutzer Rating
Antwort
Rot CommandButton, Speichern mit Schreibschutz
28.11.2019 21:24:48 Thilo
NotSolved
28.11.2019 21:26:55 Gast37298
NotSolved
29.11.2019 06:14:16 tscharl
NotSolved

Ansicht des Beitrags:
Von:
Thilo
Datum:
28.11.2019 21:24:48
Views:
712
Rating: Antwort:
  Ja
Thema:
CommandButton, Speichern mit Schreibschutz
Hallo liebe Experten, ich verzweifle an meinem Code. Ich habe einen CommandButton erstellt, bei Klick auf diesen, soll folgendes geschehen: Button deaktivieren, Blattschutz aktivieren, Datei unter meinem gewünschten Dateipfad-/namen schreibgeschützt abspeichern, Blattschutz wieder deaktiviert und Button wieder aktivieren. Ich bekomme es nicht hin, dass meine gespeicherte Datei schreibgeschützt ist. Kann mir einer von Euch auf die Sprünge helfen? Es ist eine "Mastervorlage" aus der eine weitere Vorlage erstellt werden soll, die nicht geändert werden kann. Mein bisheriger Code funktioniert soweit wie gewünscht, nur ohne Schreibschutz der gespeicherten Datei. Private Sub CommandButton2_Click() CommandButton2.Enabled = False Sheets("LF").Protect Password:="1234" ActiveWorkbook.SaveCopyAs Filename:="C:\Users\tzd1101\Desktop\Neue FA\Fertig\vorlage\" & Range("L18") & ".xlsm" CommandButton2.Enabled = True Sheets("LF").Unprotect Password:="1234" End Sub Danke im voraus!

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot CommandButton, Speichern mit Schreibschutz
28.11.2019 21:24:48 Thilo
NotSolved
28.11.2019 21:26:55 Gast37298
NotSolved
29.11.2019 06:14:16 tscharl
NotSolved