Aus einer UF andere UF schliessen
27.01.2009 17:58:42
Heinz
Ich habe einen CommandButton1 in UF "Tagesprüfungen" damit wird die UF "Paßwort_Eingabe2.Show" aufgerufen.
Wenn das Paßwort korrekt dann öffnet sich die UF "Pruefung" bis daher alles Okay.
Code siehe unten.
Nur wenn ich auf </p><pre>Private Sub Image3_Click() gehe sollte sich nur die UF "Pruefung" schliessen,
ABER die UF "Tagesprüfungen" geöffnet bleiben.
Könnte mir dazu bitte jemand weiterhelfen .
Gruß
Heinz
Private Sub CommandButton1_Click()
Dim Paßwort As String
Paßwort_Eingabe2.Show
If Paßwort "test" Then Workbooks(ActiveWorkbook.Name).Close SaveChanges:=True
End Sub
Private Sub Image3_Click()
'Unload Me
'Unload Pruefung
End Sub
Anzeige