Thema Datum  Von Nutzer Rating
Antwort
Rot modeless ohne Fenster
 10.07.2020 10:48:24 kwu
NotSolved
10.07.2020 12:12:05 Gast3333
NotSolved
10.07.2020 12:31:47 kwu
NotSolved
10.07.2020 12:45:52 Gast3333
NotSolved
10.07.2020 14:03:45 Gast41199
Solved
10.07.2020 16:43:00 kwu
NotSolved

Ansicht des Beitrags:
Von:
kwu		 Datum:
10.07.2020 10:48:24		 Views:
907		 Rating:
     
Antwort:
  Ja
Thema:
modeless ohne Fenster

Hallo,

ich habe ein kleines Formular erstellt, was einer Statusanzeige entsprechen soll. Dieses Fenster soll aber nur dargestellt werden und der Code weiterlaufen, bis das Fenster wieder ausgeblendet wird. Dazu gibt es die Modeless-Eigenschaft.

Wenn ich anstelle "UF.show vbmodeless" nur "UF3.show" aufrufe, wird das erwartete auch angezeigt nur der Code läuft aber nicht weiter. Mit modeless läuft der Code zwar wie gewünscht weiter, aber das Userform wird ohne Inhalt angezeigt. Lediglich die Titelleiste ist korrekt.

Es gibt keinerlei weitere Felder auf dem Formular.

Wird ein Breakpoint auf Zeile 5 gesetzt, sieht man das korrekt aufgebaute Formular. Ohne Breakpoint eben das leere Fenster.

Wie kann man diesem Phänomen begegnen bzw. was ist die Ursache? Kann wer helfen?

 

Sub test()
UF.nachricht = "Verarbeitung läuft seit " & Now()
UF.Caption = "Status"
UF.Show vbModeless

For i = 1 To 100000000
i = i + 1
Next

UF.Hide
End Sub

 

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 modeless ohne Fenster
 10.07.2020 10:48:24 kwu
NotSolved
10.07.2020 12:12:05 Gast3333
NotSolved
10.07.2020 12:31:47 kwu
NotSolved
10.07.2020 12:45:52 Gast3333
NotSolved
10.07.2020 14:03:45 Gast41199
Solved
10.07.2020 16:43:00 kwu
NotSolved