Userform Login

[deesnider]

Hallo,

möchte einen Userform Login haben. Habe den auch erstellt, wobei der Benutzername manuell eingegeben werden soll und nicht über eine Combobox ausgewählt wird. Klappt aber irgendwie nicht.
Wer kann helfen ?

Benutzername: Administrator
Kennwort: admin

LG

[Klaus-Dieter]

Hallo,

na wenigstens weißt du, wie man das Schließkreuz deaktiviert.  :19:

[Glausius]

Hallo,

was klappt denn nicht? Ich und andere haben keine Glaskugel und können auch nicht im Kaffeesatz lesen ....

[deesnider]

Passiert nach dem eingeben von Benutzername mit Kennwort

siehe jpg.

[Kuwer]

Hallo,

ungetestet, da das Blatt User geschützt ist:

Private Sub CommandButton1_Click()
    With Worksheets("User").Range("A1").CurrentRegion
        If TextBox1.Text = Application.VLookup(TextBox2.Text, .Resize(.Rows.Count - 1).Offset(1), 2, 0) Then
            Unload Me
        End If
    End With
    Worksheets("Anmeldung").Activate
End Sub

Gruß Uwe