Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Passwort unsichtbar

Forumthread: Passwort unsichtbar

Passwort unsichtbar
10.09.2003 07:25:39
Georg
Hallo,
die Eingabe des Passwortes soll nicht sichtbar sein, z.B. optisch nur ********.

Ich lasse das Passwort mit folgendem Makro abfragen:


Private Sub Workbook_Open()
Sheets("NAVI").Select
Range("A2").Select
Dim Eingabe As String
MsgBox "Hallo, bitte geben Sie ein Kennwort ein", vbOKOnly, "Notfall"
Eingabe = InputBox("Eingabe", "Notfall")
If Eingabe = "Herzog" Then
MsgBox "OK , richtiges Kennwort"
Else
MsgBox "Falsches Passwort"
ActiveWorkbook.Close
End If
End Sub


Statt "Herzog" soll in der MsgBox lediglich ****** angezeigt werden.
Kann mir jemand sagen, wie ich das ins Makro einbinde?
Vielen Dank für jede Hilfe
Grüße
Georg
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Passwort unsichtbar
10.09.2003 07:44:22
Hajo_Zi
Hallo Georg

das ist nur über eine Userform möglich.

Gruß Hajo
AW: vielen Dank
10.09.2003 13:52:28
Georg
Hab leider jetzt erst Zeit gefunden reinzuschauen.
Vielen Dank an Alle.
Grüße
Georg
Danke für die Rückmeldung oT
11.09.2003 10:15:28
Hajo_Zi
Anzeige
AW: Passwort unsichtbar
10.09.2003 07:45:02
Willie
Hallo Georg ich habe dir eine Datei hochgeladen mit unsichtbarem Passwort
das Passwort ist: test

Gruß

Willie
https://www.herber.de/bbs/user/965.xls
AW: Passwort unsichtbar
10.09.2003 10:02:52
Detlef
Hallo Willie,

habe den Code und die Userform in eine Tabelle von mir übernommen,leider kommt nur die
Meldung "Sie haben keine Berchtigung..." und ich komme jetzt nicht mehr an den Code ran um die Änderungen rückgängig zu machen.
Kannst Du mir helfen

Detlef
Anzeige
AW: Passwort unsichtbar
10.09.2003 07:47:16
Thomas Raschen
Hallo Georg,

warum nimmst du nicht den Leseschutz von Excel?
Wenn du unter 'Speicher unter' / 'Extras' / 'Allgemeine Optionen' gehst, kannst Du dort ein Schreib und Lesekennwort eingeben. Das sollte deinen Zweck besser erfüllen als ein Kennwortschutz über VBA den man ja einfach beim aufrufen unterdrücken kann.

Gruß

Thomas
Anzeige
@Thomas Raschen
10.09.2003 07:51:47
Willie
wenn du das in die Userform einbaust... kannst du es nicht einfach wegdrücken!
Gruß

Willie


Private Sub UserForm_QueryClose _
(Cancel As Integer, CloseMode As Integer)
If CloseMode <> 1 Then Cancel = 1
End Sub

AW: @Thomas Raschen
10.09.2003 08:09:40
Thomas Raschen
Hallo Willi,

wenn du es im Workbook open stehen hast, dann öffne mal die Datei und halte dabei die Shift-Taste gedrückt. Nun wirst du feststellen, das das Makro nicht ausgeführt wird.

Gruß

Thomas
Anzeige
;
Anzeige

Infobox / Tutorial

Passwort unsichtbar machen in Excel


Schritt-für-Schritt-Anleitung

Um ein Passwort in Excel unsichtbar zu machen, kannst Du eine Userform verwenden. Hier sind die Schritte, um dies zu realisieren:

  1. Öffne Excel und drücke ALT + F11, um den Visual Basic for Applications (VBA) Editor zu öffnen.

  2. Füge eine Userform hinzu:

    • Klicke mit der rechten Maustaste auf "VBAProject (DeineDatei.xlsm)" und wähle "Einfügen" > "UserForm".
  3. Füge ein Textfeld (TextBox) zur Userform hinzu:

    • Ziehe ein Textfeld auf die Userform und setze die PasswordChar-Eigenschaft auf *, damit das Passwort unsichtbar angezeigt wird.
  4. Füge einen Button hinzu, um die Eingabe zu bestätigen.

  5. Füge den folgenden Code in die Userform ein:

    Private Sub CommandButton1_Click()
       If TextBox1.Text = "DeinPasswort" Then
           MsgBox "OK, richtiges Kennwort"
           Unload Me
       Else
           MsgBox "Falsches Passwort"
       End If
    End Sub
  6. Verknüpfe die Userform mit dem Öffnen der Arbeitsmappe:

    • Füge den folgenden Code in das ThisWorkbook-Modul ein:
    Private Sub Workbook_Open()
       UserForm1.Show
    End Sub

Jetzt kannst Du die Datei speichern und das Passwort wird bei der Eingabe nicht sichtbar sein.


Häufige Fehler und Lösungen

  • Fehler: Meldung "Sie haben keine Berechtigung..."

    • Lösung: Halte die Shift-Taste gedrückt, während Du die Datei öffnest. Dadurch wird das Makro nicht ausgeführt und Du kannst Änderungen vornehmen.
  • Fehler: Passwort wird nicht richtig überprüft

    • Lösung: Stelle sicher, dass das Passwort in der If-Bedingung genau übereinstimmt. Achte auf Groß- und Kleinschreibung.

Alternative Methoden

Eine weitere Möglichkeit, ein Passwort unsichtbar zu machen, besteht darin, den Leseschutz von Excel zu verwenden. Gehe zu:

  1. Datei > Speichern unter > Extras > Allgemeine Optionen.
  2. Gib ein Schreib- und Lesekennwort ein.

Dies schützt Deine Tabelle, auch wenn das Passwort sichtbar bleibt.


Praktische Beispiele

Hier ist ein einfaches Beispiel, wie Du eine Userform für die Passwortabfrage gestalten kannst:

Private Sub UserForm_Initialize()
    TextBox1.PasswordChar = "*"
End Sub

Wenn Du diese Zeile in den Code der Userform einfügst, wird das Passwort unsichtbar angezeigt, sobald die Userform geöffnet wird.


Tipps für Profis

  • Benutze die UserForm_QueryClose-Methode, um zu verhindern, dass die Userform einfach geschlossen wird:

    Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
       If CloseMode <> 1 Then Cancel = 1
    End Sub
  • Teste Dein Makro gründlich, um sicherzustellen, dass es unter verschiedenen Bedingungen funktioniert.


FAQ: Häufige Fragen

1. Wie kann ich das Passwort in einer Tabelle zum Ausdrucken unsichtbar machen?
Du kannst die Zellen, die das Passwort enthalten, formatieren, indem Du die Schriftfarbe auf die Hintergrundfarbe setzt oder das Passwort unsichtbar machst, indem Du es in eine Userform eingibst.

2. Welche Excel-Version wird benötigt?
Die beschriebenen Methoden funktionieren in Excel 2010 und späteren Versionen, die VBA unterstützen.

Beliebteste Forumthreads (12 Monate)

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