Ajouter des secondes à un chrono arrêter

Bonsoir,

Je souhaite ajouter 5 secondes à un chronomètre qui est à l'arrêt. En effet je souhaite simuler un passage aux stands dans mon projet (image voiture+clef). Si quelqu'un peut m’éclaircir. Cordialement.

Bonjour,

Sub test()
    ajout 3, 5
End Sub

Sub ajout(n As Long, s As Long)
    ' s t en secondes à ajouter au chrono n
    Const chrono0 As String = "B30"
    Range(chrono0).Offset(n) = Range(chrono0).Offset(n) + 1 / 24 / 3600 * s
End Sub

eric

Bonsoir,

Désolé je n'ai répondu qu'à un exercice sur deux.

Un test ci-joint.

Cordialement,

eriiic a écrit :

Bonjour,

Sub test()
    ajout 3, 5
End Sub

Sub ajout(n As Long, s As Long)
    ' s t en secondes à ajouter au chrono n
    Const chrono0 As String = "B30"
    Range(chrono0).Offset(n) = Range(chrono0).Offset(n) + 1 / 24 / 3600 * s
End Sub

eric

Merci pour votre aide précieuse !

Ergotamine a écrit :

Bonsoir,

Désolé je n'ai répondu qu'à un exercice sur deux.

Un test ci-joint.

Cordialement,

Décidément .. encore MERCI !