Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 10:38:52
Bedingte Formatierung per VBA / MaxPoint
25.04.2024 10:30:04
Suche mit MINWENNS und Rückgabe mehrerer Werte
25.04.2024 09:47:49
Daten aus mehreren Dateien untereinander importieren
25.04.2024 09:31:31
Bild "In Zelle platzieren"
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1216to1220
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
1216to1220
1216to1220
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

mit VBA Zellen sperren

mit VBA Zellen sperren
Wolfango
Hallo Experten,
folgender Wunsch:
Gibt es einen VBA-Code der in einer geschützten Arbeitsmappe beim speichern der Datei betimmte Zellen (C8:F17) gesperrt formatiert?
Der Reihe nach:
Beim Speichern:
1. Blattschutz aufheben (mit Kennwort)
2. C8:F17 als gesperrte Zellen formatieren
3. Blattschutz wieder aktivieren (mit Kennwort)
Danke!
Gruß,
Wo.

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: mit VBA Zellen sperren
16.06.2011 16:26:03
Rudi
Hallo,
in DieseArbeitsmappe: 
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
With Sheets(1)
.Unprotect "Passwort"
.Range("C8:F17").Locked = True
.Protect "Passwort"
End With
End Sub

Gruß
Rudi
AW: mit VBA Zellen sperren
16.06.2011 17:46:42
Wolfango
Danke! Genau das wollte ich! Funktioniert!
Falls es Missverständlich war:
Der Bereich C8:F17 ist in der Ausgangssituatin 'nicht gesperrt' formatiert (Format,, Zellen, Schutz, kein Häkchen bei gesperrt); sonst würde es in der Tat keinen Sinn machen.
Danke nochmal!
was macht das für einen Sinn ?
16.06.2011 16:38:12
Matthias
Hallo
Zitat:
Beim Speichern:
1. Blattschutz aufheben (mit Kennwort)
2. C8:F17 als gesperrte Zellen formatieren
3. Blattschutz wieder aktivieren (mit Kennwort)
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
ActiveSheet.UnProtect "000"
Range("C8:F17").Locked = True
ActiveSheet.Protect "000"
End Sub
PW hinter UnProtect/Protect ist optional (hier 000)
Aber eigentlich...
... sind Die Zellen doch dann schon gesperrt beim Öffnen !
Mir bleibt der Sinn der Aktion leider verborgen.
Userbild
Anzeige
..als Mitleser...
16.06.2011 16:43:26
robert
Hi,
da er von formatieren schreibt,
meint er etwa 'g e s p e r r t e Z e l l e n'
und nicht gesperrte Zellen ?
Gruß
robert
Dann bist Du ein Hellseher ;o)
16.06.2011 17:18:53
Matthias
Hallo robert
meint er etwa 'g e s p e r r t e Z e l l e n'
und nicht gesperrte Zellen
Wo ist da der Unterschied ?

Hätte er geschrieben:
Ich möchte den Bereich C8:F17 z.B beim Speichern gelb formatieren.
Die Zellen sind jedoch gesperrt und der Blattschutz ist gesetzt ...
... dann könnte sogar ich das nachvollziehen.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
With Tabelle1
.Unprotect "000"
With .Range("C8:F17")
.Locked = True
.Interior.ColorIndex = 6
End With
.Protect "000"
End With
End Sub
Aber Hellsehen ist nicht so mein Ding
Vielleicht will er ja auch alle Zellen in diesem Bereich die gesperrt sind, farblich kennzeichnen
(es könnte also sein das Du das meintest - Die Glaskugel hat gaaaaaanz leise "Hallo" gerufen)
Wer weiß das schon.
Die Qualität / Korrektheit der Fragen lässt leider immer mehr nach!
Aber wahrscheinlich hattest Du den richtigen Riecher ;o)
Userbild
Anzeige
..keine Hellseherqualitäten...
16.06.2011 18:58:59
robert
Hallo Matthias,
ich lag total daneben, aber es lag auch daran-wobei Du Recht hast ;-)
Die Qualität / Korrektheit der Fragen lässt leider immer mehr nach!
Gruß
robert
AW: ..keine Hellseherqualitäten...
17.06.2011 15:35:39
Wolfango
....aaaalso nochmals sorry, falls ich zu unkonkret war......ich hätte erwähnen sollen, dass die besagten Zellen in der Ausgangssituation bereits 'entsperrt' waren.....aaaaaber das 'Sperren/Entsperren' ist und bleibt ein Formatierungsbefehl (...aus der Struktur der Befehlslogik betrachtet).
Wie auch immer....werde versuchen beim nächsten mal präziser zu Fragen.
Vielen Dank an dieses Forum und all jene die hier schnell und auskunftswillig Hilfe leisten!!
Gruß,
Wo .
Anzeige

84 Forumthreads zu ähnlichen Themen

Zellen mit bestimmten Passwort schützen
Benny

Hallo zusammen!
Kann mir jemand helfen? Wie kann ich Zellen mit einem bestimmten Passwort schützen, welches nachgefragt wird sobald ich in eine Zelle etwas schreiben will?
Wär klasse wenn mir jemand helfen könnte!
Lieben Gruß Benny
21.10.2008 11:45:00
Thread-ID: 1017918
13 Beiträge
Anzeige
Zellen schützen mit Passwort per Makro
Stefan

Hallo zusammen,
habe heute vormittag auf meine Frage wie ich Zellen abhängig vom Datum sperren kann folgendes Makro erhalten..Dafür erstmal vielen Dank ;-)
Jetz würde ich das ganze gern um ein Passwort ergänzen da sonst Dritte den Schutz ja leicht wieder aufheben könnten
' Private...
11.11.2008 13:12:00
Thread-ID: 1023528
2 Beiträge
VBA-Problem Zellen Sperren
Bruehmi

Hallo liebe Excel-Fan-Gemeinde!
Ich habe durch euch schon einige Probleme lösen können. Jedoch stehe ich im Moment vor einem Problem, auf das ich keine Antwort weiß.
Ich müsste per VBA Zellbereiche zum Einen dauerhaft sperren und zum Anderen einzelne Zellen in Abhängigkeit sperren.
...
14.11.2008 14:12:00
Thread-ID: 1024580
12 Beiträge
Anzeige
einzelne Zellen mit Formeln sperren
natka

Hallo Ihr Lieben Excel Begeisterte,
hättet Ihr bitte eine Tipp für mich, wie ich einzelne Zellen in einenm Tabellenblatt im Excel für Dritte sperren kann. Sie sollen zwar das Ergebnis seheh, aber nicht anklicken können. Damit meine tole Formel keinen Schaden nimmt.
Danke
natka
15.05.2009 14:20:56
Thread-ID: 1075486
4 Beiträge
einzelne Zellen per Passwort entsperren, VBA
Evil-Steve

Hallo zusammen,
in einem schreibgeschützten Tabellenblatt sollen mehrere Personen ihre Daten eintragen können. Jede Person bekommt ein persönliches Passwort. Nach der Passwortabfrage sollen die Personen nur den diesem Passwort zugewiesenen Zellbereich bearbeiten können. Habe mir hierzu eine...
19.03.2010 10:48:03
Thread-ID: 1147079
5 Beiträge
Zellen verstecken mit Passwort
Heidi

Hallo,
ich möchte gerne eine Urlaubsliste erfassen. In dieser Liste sollen Mitarbeiter die Möglichkeit haben ihren Urlaub einzugeben. Aber der Urlaub soll für die anderen Mitarbeitern nicht ersichtlich sein.
Jeder Mitarbeiter soll nur seinen eigenen Urlaub sehen können und ich als Erfas...
29.04.2010 09:43:05
Thread-ID: 1154468
24 Beiträge
einzelne Zellen sperren
meixner

Hallo zusammen,
gibt es die Möglichkeit per VBa - Makro einzelne Zellen zu sperren, damit andere Leute diese Zellen in Excel nicht verändern können? z.B. Zelle A1 bis A8 darf nicht verändert werden und solldeswegen gesperrt werden.
Vielen Dank für Tips.
Dani
16.06.2010 12:31:33
Thread-ID: 1162166
3 Beiträge
Sperren von einzelnen Zellen
einzelnen

Hallo zusammen
Wie kann ich einzelne Zellen sperren?
Zusatzfrage,
wie sperre ich Zellen, die ein Filter haben und ich trotz Sperrung auf den Filter zugreifen möchte?
Gruß
Manu
14.07.2011 16:38:54
Thread-ID: 1222194
7 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
12
3
1
11
4
3
4
23
2
6
1
5
5
4
9
5
1
17
2
16
2
7
13
5
1