Automatiser l'heure VBA

Question

Salutation je voudrais solliciter votre aide s'il vous plaît

j'ai un code Vba concernant l'heure

quand je ferme le fichier excel et je le l'ouvris à nouveau l'heure restée figée et moi ce que je voudrais ce quand je l'ouvris le fichier l'heure se met à marcher automatiquement amicalement

Sub digital_clock()
Range("a1").Value = Now
Application.OnTime Now + TimeValue("00:00:01"), "digital_clock"
End Sub

Sub ActualiserHeure()
' Cellule où l'heure sera affichée
Dim celluleHeure As Range
Set celluleHeure = Range("A1")

' Actualisation de l'heure toutes les secondes
Application.OnTime Now + TimeValue("00:00:01"), "ActualiserHeure"

' Affichage de l'heure actuelle
celluleHeure.Value = Format(Now(), "hh:mm:ss")
End Sub

BsAlv · Accepted Answer

Bonjour, c'est presque la même solution que j'avais utilisé ici https://forum.excel-pratique.com/excel/faire-clignoter-de-2-couleurs-differentes-une-cellule-d-excel.....