Schließen (X) in UF
05.04.2006 10:30:56
Frank
mit folgendem Code aus dem Archiv deaktiviere ich das Schließen (X) in einer UF:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
' Damit mit X nicht geschloßen werden kann
If CloseMode = 0 Then
MsgBox "Bitte schließen Sie die Anwendung mit der -Beenden- Schaltfläche.", vbCritical
Cancel = 1
End If
End Sub
Besteht die Möglichkeit dieses X über einen Button aus einer anderen UF wieder
frei zu geben?
Vielen Dank
Gruß Frank