Les activex ... vaut mieux les éviter quand on peut. Je te propose ma méthode qui fait appel aux API, dans ton forumulaire colle ce code :
Private Declare Function SetTimer Lib "user32" (ByVal hWnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long) As Long
Private sub Form_Load()
' Timer à 1000
SetTimer Me.hWnd, 0, 1000, AddressOf TimerProc
end sub
Dans un module, et uniquement dans un module :
Public Sub TimerProc(ByVal hWnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long)
' je te conseille plutot de mettre tes variables en public plutot qu'en static
static secondes as long
secondes = secondes + 1
End Sub
Voila, 'njoy !