Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 08:41:23
Zwei Makros in ein Arbeitsblatt - zweite wird nicht ausführt
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
368to372
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
368to372
368to372
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ganze Mappe Per Button schützen

Ganze Mappe Per Button schützen
23.01.2004 13:08:33
Stefan Glander
Hallo Forum,
ich habe 2 Dateien, Datei "A" und Datei "B". Auf Tabellenblatt "3" in Datei "A" befindet sich ein CommandButton.
Nun möchte ich gerne das mit diesem Button alle 60 TAbellenblätter in Datei "B" so geschützt werden das man sie nur noch anschauen kann.
Gruss
Stefan Glander

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ganze Mappe Per Button schützen
23.01.2004 13:49:19
Yal
_Rechtmaustaste auf dem Button, "Code anzeigen" auswählen
_ folgende ode ähnliche Code einfügen

Private Sub CommandButton1_Click()
Const pw = "dies ist das Passwort"
Dim sh As Worksheet
For Each sh In Workbooks("B").Worksheets
sh.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Pasword:=pw
Next sh
End Sub

Yal
Danke Dir o.T.
23.01.2004 14:28:27
Stefan Glander
.

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige