Guten Morgen Zusammen,
ich habe ein kleines Problemchen bei dem "Workbook_BeforeClose" Ereigniss.
Sub Workbook_BeforeClose(Cancel As Boolean)
If ThisWorkbook.Worksheets("check").Range("CB3") <> "" Then
Data.Show
End If
End Sub
Sub userform_activate()
If ThisWorkbook.Worksheets("Kundendaten - customers data").Range("B1").Value = "deutsch" Then
CommandButton1.Caption = "OK & schließen"
Data.Caption = "Prüfung der Vollständigkeit"
Label2.Caption = "Für die Anlage der oder des Kunden fehlen folgende Daten:"
Label3.Caption = "Zeile fehlende Information"
Else
CommandButton1.Caption = "OK & close"
Data.Caption = "completeness check"
Label2.Caption = "For the creation of customer(s) following data are missing:"
Label3.Caption = "row missing information"
End If
Label1.Caption = ThisWorkbook.Worksheets("check").Range("CB3").Value
End Sub
1. Die Userform wird nur ausgeführt wenn ich Daten ändere und dann schließe. Also vermutlich wenn ".saved = false" ist? Aber warum? Bei anderen Projekten wurde es ("es" war da aber nur eine Msgbox) auch ausgeführt, wenn ich die Mappe öffnete und sofort wieder schloss. (Punkt 1 ist für mich nur "nice to know", da das in der Praxis nicht auftritt.)
2. Das eigentliche Problem:
Die Userform "Data" enthält Label die bei "userform_activate" befüllt werden.
Die Userform kann ich auch per commandbutton aufrufen und dann funktioniert alles einwandfrei, d.h. in den Labeln werden alle Zellen aufgelistet die der User "vergessen" hat auszufüllen.
Wird die Userform "Data" nun aber über das "Workbook_BeforeClose" Ereigniss gestartet, wird das Makro in "userform_activate" nicht abgearbeitet, sodass "Data" nur die Label mit ihrer Standard "Caption" anzeigt.
Was kann ich tun?
Vielen Dank im voraus
MfG
Enrico
|