[Tasos]

Καλημέρα Σταύρο!
Πρόκειται για δυνατότητα της VB - VBA και προσφέρεται.

Δοκίμασε:

Private Sub Button_Click()
StartOverLabel:
    If MsgBox("This is a test", 37, "Test...") = 4 Then
        GoTo StartOverLabel
    Else
        GoTo NextLabel
    End If
NextLabel:
    MsgBox "End of Test", , "Test..."
End Sub

Καλή συνέχεια!

Τάσος