Live-Forum - Die aktuellen Beiträge
Datum
Titel
30.11.2023 14:52:42
PDF Dateien selectieren und verschieben
30.11.2023 14:44:49
Textbox Vertikale Bildlaufleiste immer am Anfang
30.11.2023 14:02:49
Hallo Piet Finde keine Lösung zu meinem Problem
Du konntest keine passende Antwort finden?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1708to1712
1708to1712
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenblatt mit Passwort schützen - kein ausbl.

Tabellenblatt mit Passwort schützen - kein ausbl.
06.09.2019 12:50:26
Christopher
Hallo ihr lieben,
ich habe momentan in meinem Betrieb ein Projekt am laufen, eine Funktionierende Excel Tabelle zu erstellen. Mit Makros sollen Daten etc. sortiert werden, etc.
Nun folgendes Problem:
- In dieser Datei arbeiten mehrere Leute über der o365 Cloud in der Datei.
- Personen A dürfen am besten nichts im Blatt von Personen B ändern
Geht es, dass man ein Tabellenblatt beim öffnen mit Passwort schützt, OHNE es auszublenden?
Vielen dank!
Chris

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

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblatt schützen
06.09.2019 13:07:18
Rudi
Hallo,
ja sicher kann man das schützen.
Aber sehen kann es jeder.
Gruß
Rudi
AW: Tabellenblatt mit Passwort schützen - kein ausbl.
06.09.2019 13:12:14
UweD
Hallo
Angenommen:
die Tabellenblätter heißen so, wie die Anmeldenamen der Nutzer..
Code mus in den Bereich "DieseArbeitsmappe"
Microsoft Excel Objekt DieseArbeitsmappe 
Option Explicit 
 
Private Sub Workbook_BeforeClose(Cancel As Boolean) 
    Dim strUser As String, TB 
    Dim strPass As String 
     
    strPass = "ABC" 
     
    For Each TB In ThisWorkbook.Sheets 
        TB.Protect strPass 
    Next 
     
    ThisWorkbook.Save 
 
End Sub 
 
Private Sub Workbook_Open() 
    Dim strUser As String, TB 
    Dim strPass As String 
     
    strPass = "ABC" 
     
    strUser = Environ("username") 
     
    For Each TB In ThisWorkbook.Sheets 
        If LCase(TB.Name) = LCase(strUser) Then 
            TB.Unprotect strPass 
        End If 
    Next 
 
End Sub

ABER: Nichts ist sicher.
Anzeige
AW: Tabellenblatt mit Passwort schützen
06.09.2019 13:20:25
Bernd
Servus Chris,
teste mal...
Im Codebereich von "DieseArbeitsmappe": 

Option Explicit
Dim ws As Worksheet
Private Sub Workbook_Open()
For Each ws In ThisWorkbook.Worksheets
ws.Protect Passwort & ws.Index
Next ws
End Sub
In ein allgemeines Modul: 

Public Const Passwort As String = "Passwort"
und in JEDES Tabellenblatt folgenden Code: 

Option Explicit
Dim Pass As String
Dim ws As Worksheet
Private Sub Worksheet_Activate()
Pass = InputBox("Bitte das Passwort für dieses Blatt eingeben:", "Passwortschutz")
If Pass = Passwort & ActiveSheet.Index Then
ActiveSheet.Unprotect Passwort & ActiveSheet.Index
End If
End Sub
Private Sub Worksheet_Deactivate()
ActiveSheet.Protect Passwort & ActiveSheet.Index
End Sub
Grüße, Bernd
Anzeige

314 Forumthreads zu ähnlichen Themen

Hilfe: Makro einzelne Zeilen mit Passwort schützen
Michael

Hi!
Liebe Excel-Profis!
Wie schon viele Male vorher vertraue ich auf eure Weisheit und Ratschläge. Nachdem ihr bereits aus einem absoluten Excel-Noob wie mir über die Jahre hinweg einen halbwegs routinierten Anwender gemacht habt, der sogar kleine Makros alleine zusammenstöpseln kann, b...
27.11.2008 20:58:57
Thread-ID: 1028503
5 Beiträge
EXCEL Datei mit Passwort starten
hindenberger@gmx.de

Hallo,
kann ich eine EXCEL- Liste mit einem Passwort versehen, so dass ich sie nur mit korrektem Passwort starten kann?
Danke.
Gruß,
Patric
30.11.2008 12:22:00
Thread-ID: 1029005
5 Beiträge
Code per Makro mit Passwort schützen
Gordon

Moin,
hab zwar schon gesucht, aber bisher nicht gefunden, was mir helfen könnte. Und zwar suche ich einen Befehl, wie man per Makro ein Projekt mit einem Passwort im VBA-Editor schützen kann. Gibt es da eine Möglichkeit?
Gruß
Gordon
02.03.2009 08:57:35
Thread-ID: 1055410
6 Beiträge
Probleme beim Daten per Makro mit PW schützen
Mandy

Hallo,
ich habe eine Mappe, da wird beim Öffnen der Mappe gleich mal der Range B24:F34 gesperrt.
Nun laufen ein paar makros. Da kann es vorkommen, das Daten wieder in den Range geschrieben werden müssen. Also Range wieder freigeben und Daten rein. (passt)
So nun soll ganz am Schlus...
09.10.2009 08:21:11
Thread-ID: 1108439
5 Beiträge
Nur eine Zelle mit Passwort schützen
Horst

Hallo!
Ich möchte nicht ein ganzes Excelblatt mit einem Passwort schützen, sondern nur eine Zelle innerhalb eines Blattes.
Kann man dieses?
Und wenn ja wie?
Tabelle1.Range("A1").Protect Password:="123" oder
ActiveCell.Protect Password:="123" oder
Selection.Protect Passwo...
26.11.2009 08:53:47
Thread-ID: 1120172
3 Beiträge
Ausführung eines Makros mit Passwort | Herbers Excel-Forum
Wolfango
Hallo Experten,
kann ich der Ausführung eines Makros die Eingabe eines Passwortes voranschalten?
Und wie?
Danke und Gruß,
Wo.
14.01.2010 16:30:34
Thread-ID: 1129993
4 Beiträge

Links zu Excel-Dialogen

InputBox
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige