UserForm
20.09.2016 16:32:31
Annette
da ich nun endlich auch mein Wissen erweiteren möchte , habe ich mir ein neues Projekt vorgenommen.
Nach einer Stunde habe ich es geschaft eine Userform so zu erstellen, wie ich es gerne hätte.
Es wird geöffnet nach der Dateiöffnung :
Es sind Führerscheine zur Kontrolle fällig und ein Button mit Ende drauf (geht leider kein Bild)
Im Code steht folgendes:
Private Sub CmMD_Ende_Click()
End Sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = 0 Then
MsgBox "Bitte schließen Sie die Anwendung mit der -Ende- Schaltfläche.", vbCritical
Cancel = 1
End If
End Sub
Die Anzeige kommt,aber auf ENDE drücken bringt nichts und auf x drücken kommt entsprechende Nachricht richtig.
Irgend etwas mache ich noch falsch.
Danke für die Hilfe
Annette
Anzeige