Excel VBA screen not updating after Wait function

[Michael36]

I have a small program for training purposes. In the program I use a Wait function. Now my user form is not updating my label during the for next loop where the wait is inserted. How can I solve this?
If I run the program in debug mode the label is updated, but in the loop I don't see this. I only see the first message en de "Einde"message

For Teller1 = 1 To 20
    strHandling = Selection.Offset(Teller1, 0).Value
        If strHandling = "" Then
        lblExecution.Caption = "Einde"
        Exit For
    End If
    If strTypeLeerling = "Starter" Then
        If Teller1 = 2 Then lblChallenge.Caption = strChallenge
        lblExecution.Caption = strHandling
        Application.Wait (Now + TimeValue("00:00:01"))
    ElseIf strTypeLeerling = "Leerling" Then

 

[Michael36]

This can be solved with the following:
me.repaint
after the wait will do!