Live-Forum - Die aktuellen Beiträge
Datum
Titel
07.10.2025 18:27:08
Formel anstelle XVWERWEIS für alte Excel-Version
07.10.2025 15:42:10
Identische-Tabellen-identische Sub's funktionieren nicht...
07.10.2025 09:25:19
Bedingte Formatierung mit bezug auf anderes TabellenBlatt
07.10.2025 08:24:37
Formel mit dynamischer Name aus Zelle
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
1740to1744
1740to1744
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA - Schutz aufheben nach Eingabe

Forumthread: VBA - Schutz aufheben nach Eingabe

VBA - Schutz aufheben nach Eingabe
19.02.2020 15:03:50
Harald
Hallo zusammen,
ich möchte gerne in einer Tabelle im Bereich A1:A100 erst dann eine Änderung in Zelle A1 erlauben, wenn vorher der Eintrag in Zelle B1 aktualisiert wurde, analog für die Paare A2:B2 und so weiter.
Per Datenüberprüfung ist das IMHO nicht möglich.
Per VBA sollte das prinzipiell gehen mit Blattschutz aufheben, Intersect und relativem Zellbezug, nur sind leider meine VBA-Kenntnisse zu beschränkt, um das auszuprogrammieren.
In der Recherche habe ich dazu nichts gefunden. Falls es schon etwas zu dem Thema gibt, bitte ich um einen entsprechenden Hinweis, sonst um eine VBA-Hilfestellung.
Vielen Dank im Voraus!
Gruß
Harald
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA - Schutz aufheben nach Eingabe
19.02.2020 15:33:57
Nepumuk
Hallo Harald,
in das Modul der Tabelle (Rechtsklick auf den Tabellenreiter - Code anzeigen):
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim objRange As Range, objCell As Range
    Set objRange = Intersect(Target, Range("B1:B100"))
    If Not objRange Is Nothing Then
        Call Unprotect(Password:="GEHEIM")
        For Each objCell In objRange
            objCell.Offset(0, -1).Locked = False
        Next
        Call Protect(Password:="GEHEIM")
    End If
End Sub

Gruß
Nepumuk
Anzeige
;

Forumthreads zu verwandten Themen

Passwortabfrage ohne Blattschutz zu umgehen, wie?
Thomas

Hi, in meiner Tabelle sind diverse Zellen durch den Blattschutz geschützt. Nachbahrzellen sind jedoch für eine Bearbeitung freigegeben. Aber, um sie vor unbefugten ausfüllen zu schützen habe ich mir diesen code ausgeliehen und angepasst.
' Private Sub Worksheet_SelectionChange(ByVal target...
24.11.2008 14:21:54
Thread-ID: 1027314
3 Beiträge
Makro Zelle Schutz aufheben
Kurt

Guten Abend,
ich habe dieses Makro auch übers Forum:
Private Sub Worksheet_Change(ByVal Target As Excel.Range) Application.ScreenUpdating = False If Intersect(Target, Range("A10:C20")) Is Nothing Then Exit Sub ActiveSheet.Unprotect ("kk") On Error GoTo fehler Application.EnableEvents...
16.02.2009 19:53:00
Thread-ID: 1051271
27 Beiträge
VBA Kennwortschutz aufheben & setzen Problem
Andreas

Hallo Herber Fans,
ich habe hier schon im Forum gesucht und auch einen Code gefunden. Es geht um das temporäre Aufheben des VBA Kennwortes im VBA Editor. Das Kennwort in der Beispieldatei ist „test“.
Die Datei wird geöffnet, ein Button wird kreiert. Wenn ich auf diesen Button klicke, er...
03.07.2009 21:26:13
Thread-ID: 1086309
7 Beiträge
Aus-Einblenden / Makroschutz aufheben
juergen

Hallo zusammen,
hoffe Ihr habt Ostern gut überstanden.
Hab u. stehendes Makro und muss den Schutz aufheben, damit er Tabellenblätter einblendet. Kann mir bitte jemand weiterhelfen?
Für Eure Bemühungen,....... danke ich schon jetzt:)
Gruß
Juergen
Sub blättern1() ' blätter...
26.04.2011 15:44:26
Thread-ID: 1211836
3 Beiträge
Abfrage ob Blattschutz mit Passwort gesetzt wurde
DominikHH

Hallo zusammen,
ich muss in einem Arbeitsblatt überprüfen, ob ein Blattschutz gesetzt wurde und - wenn das der Fall ist - ob auch ein Passwort vergeben wurde.
Im Fall, dass zusätzlich ein Passwort gesetzt wurde, muss ich anders reagieren, als wenn nur das Blatt geschützt wurde (dann kan...
22.11.2012 15:49:32
Thread-ID: 1287706
2 Beiträge
Blattschutz ohne passwortabfrage
Svenja

Hallo,
ich habe eine Excel-Datei mit mehreren Reitern.
In Tabellenblatt "Beiträge" habe ich einige Zahlen. Diese werden über ein weiteres Tabellenblatt über Button selektiert und bestimmte Daten daraus kopiert und in mein weiteres Tabellenblatt eingefügt.
Da ich im Tabellenblatt "Be...
19.12.2012 21:09:09
Thread-ID: 1291604
4 Beiträge
Anzeige
VBA Code Tabellenschutz mit Passwort
Max

Hallo zusammen,
hat jemand ein Standard VBA Code um ein Tabellenblatt ("Tabelle1") einzublenden. Das Einblenden der Tabelle soll über ein CommandButton inklusive einer Passwortabfrage erfolgen. Ebenso soll das spätere Ausblenden der Tabelle über einen CommandButton erfolgen.
Danke im vo...
28.12.2012 11:37:27
Thread-ID: 1292225
5 Beiträge
VBA - "Aus dem Web" mit Passwort
Timonski

Servus...
ich muss mich bei einer Internetseite mit Benutzer und Passwort einloggen.
nach dem einloggen, wollte ich gerne die Seite/n nach Excel importieren.
das Problem ist, er loggt sich nicht ein...
bei den ersten Schritten (FETT) loggt er sich auf der Seite ein... funktionie...
08.05.2014 15:23:16
Thread-ID: 1360536
5 Beiträge
Vor Makro Blattschutz aufheben: Sicherheitsabfrage
Michael Kl.

Hallo zusammen,
ich habe ein Makro zur Aufhebung des Blattschutzes erstellt.
Vor der endgültigen Deaktivierung des Schutzes soll eine Abfrage erscheinen, ob der Schutz wirklich deaktiiert werden soll. Ihr kennt diese Abfragen mit Sicherheit von Windows. Dort hat man die Möglichkeit, bei i...
17.07.2002 12:39:18
Thread-ID: 137441
3 Beiträge
Makroschutz über Makro aufheben
Stephan

Hallo zusammen,
ich habe ein Makro programmiert, dass eine neue Datei erstellt und ein Makro von der alten Datei übernimmt. Da ich die Makros in der alten datei aber alle geschützt habe, tritt ein Laufzeitfehler auf beim versuch, das Makro zu kopieren.
Wie kann ich mit einem Makro den Sc...
28.08.2002 08:47:07
Thread-ID: 153515
3 Beiträge
Anzeige
Passwortgenerator mit VBA
Helmut

Schönen Freitag Mittag,
anbei eine Datei mit Kommentaren in denen
die Vorgaben beschrieben sind.
Ich hoffe dass ich es gut beschrieben habe....
und bitte um Hilfestellung :-)
https://www.herber.de/bbs/user/112726.xlsm
MfG
Helmut
07.04.2017 13:32:22
Thread-ID: 1551772
6 Beiträge
Blattschutz per Makro mit Passwortoption
beckersbest

Guten Morgen,ich habe mal wieder eine Frage. Ich möchte per Button den Blattschutz einschalten. Das klappt mit folgendem VBA-Code auch ganz gut:-----------------------------------
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
-----------------------------------...
04.09.2002 08:11:14
Thread-ID: 156138
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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