Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Makro Schutz und aufheben

Forumthread: Makro Schutz und aufheben

Makro Schutz und aufheben
31.03.2003 12:09:58
Helmut Ivers
moin excel- freaks

folgende frage:
wie kann ich folgendes in einem makro realisieren:
24 Tabellenblätter, in 30 Zeilen steht jeweils geschützt in der 1 u. 2. Spalte das gleiche. Um änderungen vorzunehmen, muss ich in jedem tabellenblatt den schutz aufheben, ändern und wieder schützen. wenn änderungen anstehen, betrifft es alle tabellen gleichzeitig. ein makro zum aufheben ein makro zum schützen wäre wahrscheinlich von vorteil.
auf eine antwort hofft m.fr. Gr.
helle



Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Makro Schutz und aufheben
31.03.2003 12:15:42
heinz

aufheben sieht ungefähr so aus
...
for i = 1 to 24
sheets(i).unprotect = true
next i
...

in der hilfe gibts ein beispiel mit passwortschutz usw.

gruß, heinz

Re: Makro Schutz und aufheben
31.03.2003 12:15:55
Mike E.

Hallo,

warum verknüfst du nicht die übrigen 23 Blätter mit dem ersten?
Dann musst du immer nur im ersten Tabellenblatt Änderungen vornehmen und sparst dir so 23 weitere Schritte.

Bsp.:

Tabelle2!A1 = Tabelle1!A1...

Gruß
Mike

Anzeige
Re: Makro Schutz und aufheben
31.03.2003 12:30:05
Wilfried

er so.
Sub Unprotect()

Dim Wb As Workbook, Sh As Worksheet
For Each Wb In Workbooks
For Each Sh In Wb.Worksheets
Sh.Unprotect "test"
Next Sh
Next Wb
End Sub

Sub protect()

Dim Wb As Workbook, Sh As Worksheet
For Each Wb In Workbooks
For Each Sh In Wb.Worksheets
Sh.protect "test"
Next Sh
Next Wb
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige