Aide VBA Excel 2003
une tempo de 3s et après ouvrir une form,

Timer, fonction, exemple
Cet exemple utilise la fonction Timer pour mettre l'application sur pause. Cet exemple utilise également la fonction DoEvents pour donner le contrôle à d'autres processus pendant la pause.

Private Sub UserForm_Initialize()
Dim PauseTime, Start, Finish, TotalTime
If (MsgBox("Cliquez sur Oui pour effectuer une pause de 5 secondes", 4)) = vbYes Then
    PauseTime = 5    ' Définit la durée.
    Start = Timer    ' Définit l'heure de début.
    Do While Timer < Start + PauseTime
        DoEvents    ' Donne le contrôle à d'autres processus.
    Loop
    Finish = Timer    ' Définit l'heure de fin.
    TotalTime = Finish - Start    ' Calcule la durée totale.
    MsgBox "Pause de " & TotalTime & " seconde(s)"
Else
    End
End If


End Sub

Alors merci de ta réponse déjà il y a cependant deux erreur lors de la compilation : - timer ne peut pas etre utiliser en tant qu'expression et - doevents n'est pas reconu car il me dise qu'il est pas déclaré ... Voilà merci

J'arrive toujours pas à le faire archer. :s

http://www.codes-sources.com/gma/pause