Userform mit dem X schliessen

Forumthread: Userform mit dem X schliessen

22.08.2006 11:26:22

Josef

Hallo!
Wie kann ich bitte eine Userform mittels Eingabe eines Passwortes mit dem Schliesskreuz oben rechts schliessen. Ist das Passwort nicht bekannt dann soll die Userform mit dem Schliesskreuz nicht geschlossen werden.
Danke
Josef

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Userform mit dem X schliessen

22.08.2006 11:57:12

u_
AW: Userform mit dem X schliessen

22.08.2006 12:12:56

Josef

AW: Userform mit dem X schliessen

22.08.2006 11:57:12

Hallo,
ins Klassenmodul der UF:


Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Dim strPW As String
If CloseMode = False Then
strPW = InputBox("Passwort?", "Passwort-Abfrage")
If strPW <> "Passwort" Then Cancel = True
End If
End Sub

Gruß
Lesen gefährdet die Dummheit

AW: Userform mit dem X schliessen

22.08.2006 12:12:56

Josef

Hallo u_!
Danke Dir recht herzlich für Deine Hilfe
Josef

Forumthread: Userform mit dem X schliessen

2 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread