Excel Userform zwingt Label Updates vor Unter

Question

weiterhin habe ich einen Unter in einer Kalkulationstabelle einzelne Positionen zu entfernen. Da die Verarbeitung einige Sekunden dauert, möchte ich einen kleinen Ready-Indikator haben.

Im Moment habe ich ein kleines Etikett (siehe oben) Lab_Indic.

Wenn der Benutzer klickt entfernen, es läuft die _Click Unter, die mit dieser öffnet:

With Lab_Indic 
    .BackColor = &HFF& 
    .Caption = "WORKING" 
End With 

... und schließt mit diesem:

Mit Lab_Indic .BackColor = & H8000 & .Caption = "READY" Ende mit

Aber die anfängliche "Working" Änderung scheint nur zu passieren, wenn ich th Rau; Wenn ich es normal laufe, scheint es vorbei zu gehen.

Gibt es eine Möglichkeit, das Etikett zu aktualisieren, bevor Sie mit dem Rest fortfahren? DoEvents hört sich so an, als würde es den Job erledigen, aber einige Quellen, die ich mir angeschaut habe, deuten darauf hin, dass es einen Nachteil für diesen Ansatz geben könnte.

Answer 1

Es scheint gut zu funktionieren, so dass ich es als eine Antwort hinterlassen, aber ich bin immer noch sehr interessiert in jedem Hinweis darauf, ob es eine guten Lösung oder nicht ...

With Lab_Indic 
    .BackColor = &HFF& ' &H00008000& 
    .Caption = "WORKING" 
End With 
DoEvents 

Ich habe gerade eine einzige DoEvents hinzugefügt, um das Etikett zu aktualisieren, und es scheint gut zu funktionieren. Ich weiß nicht, ob es irgendwelche Auswirkungen gibt.