Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2025 20:00:52
Warum löscht mein Makro keine Zeilen
19.04.2025 19:45:46
Liniendiagramm mit teils doppelten Datumszeiträume
19.04.2025 16:33:09
MouseMove nur über CheckBox
19.04.2025 16:05:21
VBA - letzte Zeile bestimmen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
124to128
124to128
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Blattschutz selektiv?

Forumthread: Blattschutz selektiv?

Blattschutz selektiv?
29.05.2002 11:42:39
Christian
Moinsen,
hab hier folgendes Problem:

Ich habe mehrere Excel-Dateien gleichzeitig geöffnet, sagen wir mal 15 (pro Mitarbeiter, den es zu "verwalten" gilt, eine eigene Datei. Jede einzelne Datei besteht aus 12 Blättern, nämlich (ihr ahnt es), Jan-Dez. Ich möchte nun, beispielsweise am 31.5., dafür Sorge tragen, das das entsprechende Blatt, in diesem Fall Mai, in allen offenen Dateien schreibgeschützt wird (damit sich die Mitarbeiter nicht etwa noch nachträglich Stunden notieren können).

Ist das überhaupt möglich?

Kann man das, wenn es möglich ist, evtl. automatisieren ?

Vielen Dank schonmal an alle, ich hoffe die Fragestellung ist verständlich.

mfg
Chris

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Kategorie
Blattschutz
Tags
#automatisierung #blattschutz #makros
Relevante Fragen
Anzeige
Betreff
Datum
Anwender
Anzeige
Re: Blattschutz selektiv?
01.06.2002 18:58:57
Andreas
Hi Chris,

habe mir das folgende ausgedacht, müsste für dich passen:

Den Text in "Diese Arbeitsmappe" unter der Option "Workbook Open" einfügen

Private Sub Workbook_Open()
Application.ScreenUpdating = False
Dim Datum1, Monat1
Dim Cnt As Integer
Dim N As Integer
Dim M As Integer
Datum1 = Now
Monat1 = Month(Datum1)
M = 1
Dim Wb As Workbook, Sh As Worksheet
For Each Wb In Workbooks
For N = M To Monat1
Worksheets(N).Protect ("test")
Next N
Next Wb
Application.ScreenUpdating = True
End Sub

Falls Du es so verwendest wird jedes Blatt in jeder offenen Arbeitsmappe dessen Nummer kleiner oder gleich der Monatsnummer ist geschützt sobald du die Arbeitsmappe öffnest in der sich dieses Makro befindet. Du kannst es aber auch in jede Mitarbeitermappe unter "Workbook Open" einfügen, du solltst dann aber "For Each Wb In Workbooks" und "next WB" entfernen so dass das Marko nur für diese Arbeitsmappe gilt.

Hoffe, dass es das war, was du wolltest

LG

Andreas


Anzeige

Forumthreads zu verwandten Themen

Gruppierung trotz Blattschutz
Jürgen

Hallo Leute,
habe hier schon kräftig gestöbert und eigentlich soweit die Lösung zu meinem Problem gefunden.
Ich möchte die Gruppierungsfunktion und die Auto-Filter-Funktion nutzen, auch wenn das Blatt
geschützt ist. Hierzu verwende ich folgenden Code:
Private Sub Workbook_open...
13.08.2008 10:55:00
Thread-ID: 1001434
5 Beiträge
Blattschutz führt zu Abbruch !
wulfjack

... das hatte ich noch nie, obwohl ich sicherlich schon viel komplexere Excel-Dateien erstellt habe!
In einer Exceldatei mit 3 Arbeitsblättern ist das erste Arbeitsblatt als "Eingabe" definiert, d.h. von den benutzten Spalten A-N und den Zeilen 1 - 2000, ist nur der Bereich B10-B2000 "unge...
18.08.2008 10:16:59
Thread-ID: 1002511
3 Beiträge
Blattschutz führt zu Abbruch !
wulfjack

... das hatte ich noch nie, obwohl ich sicherlich schon viel komplexere Excel-Dateien erstellt habe!
In einer Exceldatei mit 3 Arbeitsblättern ist das erste Arbeitsblatt als "Eingabe" definiert, d.h. von den benutzten Spalten A-N und den Zeilen 1 - 2000, ist nur der Bereich B10-B2000 "unge...
18.08.2008 10:49:05
Thread-ID: 1002519
2 Beiträge
Anzeige
Blattschutz beim Daten einspielen
Tobi

Hallo,
ich habe eine Frage bzgl. einem Makro.
Habe das folgende Makro mit welchem ich Daten aus einer Exceldatei in eine andere importiere. Leider übernimmt es mir auch immer die Formatierung der Zellen. In der Ausgangsdatei ist bei manchen Zellen unter "Zellen formatieren" der Haken f...
19.08.2008 09:18:00
Thread-ID: 1002794
4 Beiträge
Daten importieren (mit Blattschutz)
Marcus

Einen schönen guten Morgen,
ich habe ein kleines Problem...
Ich habe eine Arbeitsmappe (Stundenabrechnung) in der ingesamt 14 Arbeitsblätter vorhanden sind. Alle habe ich einzeln geschützt und nur die Zellen freigegeben, in denen man die Arbeitszeiten eintragen kann. Alles anderen sind...
20.08.2008 09:38:00
Thread-ID: 1003096
2 Beiträge
Blattschutz per Makro
oblivion

Hallo, bei mir steht im Blatt "Gesamt" der folgende Code. Früher war es kein Problem mit hilfe der Befehle unprotect und protect das Blatt "Gesamtdaten" zu schützen. Nur ist der Code etwas größer geworden, bzw. es wird ein weiteres Makro abgespielt. Weiß jemand wie ich mein Makro ändern muss,...
20.08.2008 23:45:00
Thread-ID: 1003339
2 Beiträge
Blattschutz
Gustav

Hallo,
ich möchte ein Blatt schützen, jedoch soll eine Spalte bzw. an einem anderen Bsp lediglich eine Zelle nicht geschützt werden.
Diese Zelle soll lediglich für das Auswählen von Einträgen aus einer Gültigkeitsliste angewählt werden.
Geht das?
Bin für jeden Tipp dankbar.
...
21.08.2008 15:19:00
Thread-ID: 1003526
4 Beiträge
Gruppierung von Blattschutz loslösen
Blattschutz

Hallo,
ich habe mein Tabellenblatt geschützt. Ich möchte aber, dass sich die Gruppierungen in der Tabelle nach Bestehen des Blattschutzes weiterhin öffnen lassen. Dies ist bei meinen Einstellungen nicht der Fall.
Kann mir jemand helfen?
Besten Dank im Voraus.
Gerd
25.08.2008 08:05:17
Thread-ID: 1004360
6 Beiträge
Blattschutz in VBA
Lars

Hallo,
ich möchte beim Klick auf eine CheckBox in Tabellenblatt A (geschützt) etwas in das geschützte Blatt B schreiben lassen. Dafür habe ich in den Code im Makro der CheckBox wie folgt eingebettet:
Private Sub Test
ActiveSheet.Unprotect "123456789"
Worksheets("B").Unprotect "1...
25.08.2008 14:03:00
Thread-ID: 1004449
3 Beiträge
Blinken trotz Blattschutz
Daniela

Hallo,
ich habe folgendes Problem: In meiner Tabelle gibt es zum einen geschützte und freigegebene Breiche ( damit nicht alles geändert werden kann) und zum anderen sollen bestimmte Zellen blinken. Beides funktioniert getrennt wunderbar...aber zusammen eben nicht! Stets ist entweder das gan...
01.09.2008 12:58:49
Thread-ID: 1006408
4 Beiträge
BlattSchutz
Baywatch

Hi
eine kleine Frage ich habe in meiner Datein ein Blatt welches komplett geschützt werden soll, aber die Formeln die im Blatt stehen, sollen trotzdem arbeiten istd as möglich? gleichfalls soll man auf die VBA Programmierung nicht mehr zugreifen können.
Danke und GRuß
Daniel
11.09.2008 11:58:00
Thread-ID: 1009065
9 Beiträge
Gruppieren trotz Blattschutz
Sandra

Hallo zusammen,
ich brauche mal wieder dringend eure Hilfe.
Zwar habe ich im Archiv schon ein paar Beiträge gefunden, aber ich komme damit nicht zurecht.
Folgendes Problem:
- ich habe eine Excel-Datei, welche insgesamt 6 Tabellenblätter enthält
- das Tabellenblatt "Original"...
15.09.2008 16:40:00
Thread-ID: 1009842
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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