passe par l'API SetTimer, mais attention, elle impose certaines précautions qui, faute d'être prises, te feront planter Excel. Pas le temps de faire un exemple, mais c'est facile à trouver sur AllApi (mais j'ai perdu l'adresse)
Public Declare Function SetTimer Lib "user32" ( _
ByVal HWnd As Long, ByVal nIDEvent As Long, _
ByVal uElapse As Long, ByVal lpTimerFunc As Long) As Long
Public Declare Function KillTimer Lib "user32" ( _
ByVal HWnd As Long, ByVal nIDEvent As Long) As Long