Bonjour à tous.

J'ai le code suivant (il y a plus que ce bout de code avant ce qui suit incluant la déclaration des variables):

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Private Sub Workbook_Open()
If [NombreEmployé] = 0 Then
    NomEmployé1 = InputBox("Quel est le prénom et le nom de votre premier employé ?", "Démarage du fichier !")
    If NomEmployé1 = "" Then
        MsgBox "Le prénom et le nom de famille du premier employé est obligatoire. Veuillez inscrire les informations S.V.P.", vbRetryCancel, "Démarage du fichier !"
 
     Case vbRetry
Si l'utilisateur n'inscrit pas le nom dans le Inputbox, j'aimerais que s'il clique sur Retry que le code retourne au début.

Me reste à savoir comment

Merci à l'avance..

dlight