Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1956to1960
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
Inhaltsverzeichnis

Alle abgelaufenen Monate sperren

Alle abgelaufenen Monate sperren
01.12.2023 13:46:58
STeve
Hallo liebe Profis.. Wieder mal eine Bitte.

Habe 12 Tabellenblätter mit den Monatsnamen "JANUAR" "FEBRUAR" usw.............

Jetzt will ich beim Öffnen der Datei jedes bereits a b g e l a u f e n e Monatsblatt mit Passwort sperren.

Beispiel: Datei wird am 2.7. geöffnet dann sollten die Blätter Januar bis Juni gesperrt sein.

Bräuchte also eine Rückwärtsschleife!!

Danke für eure Hilfe

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Alle abgelaufenen Monate sperren
01.12.2023 14:06:31
daniel
Hi
warum rückwärtsschleife?
wenn die 12 Blätter korrekt angeordnet sind, dann:

for x = 1 to Month(date) - 1

sheets(x).protect "Passwort"
next


Gruß Daniel
AW: Alle abgelaufenen Monate sperren
01.12.2023 14:11:54
STeve
Hallo Daniel
Danke für die schnelle Hilfe.......aber leider nicht korrekt angeordnet darum muss ich sie mit dem Monatsnamen ansprechen.
Kannst mir da helfen.
Danke
AW: Alle abgelaufenen Monate sperren
01.12.2023 14:27:31
daniel
dann mit:

sheets(format(Dateserial(2000, x, 1), "MMMM"))

aber du musst deine Blätter dann so benennen, wie diese Funktion die Monatsnamen ausgibt.
AW: Alle abgelaufenen Monate sperren
01.12.2023 15:07:18
STeve
Danke für die schnelle Hilfe - es läuft
lg STeve
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige