Thema Datum  Von Nutzer Rating
Antwort
Rot Userform ausführen bei Workbook_BeforeClose
09.03.2016 10:14:12 Enrico
NotSolved

Ansicht des Beitrags:
Von:
Enrico
Datum:
09.03.2016 10:14:12
Views:
2720
Rating: Antwort:
  Ja
Thema:
Userform ausführen bei Workbook_BeforeClose

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


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Userform ausführen bei Workbook_BeforeClose
09.03.2016 10:14:12 Enrico
NotSolved