Horloge, mise à jour toutes les minutes

Bonjour,

J'ai un bout de code qui fait tourner une horloge

Sub ExecuterTimer()
    [A1] = Format(Now, "hh:mm")
    Application.OnTime (Now + TimeSerial(0, 0, 1)), "ExecuterTimer"
End Sub

Il y a une mise à jour toutes les secondes, logique.

Première question, est-ce que cela peut interférer avec d'autres macros ou des requêtes PowerQuery cette actualisation à la seconde ? On voit bien le fichier se réactualiser dans la barre de titre et le pointeur de la souris aussi (passe brièvement en cercle bleu).

Sinon peut-on régler le code pour qu'il s'actualise uniquement toutes les minutes ?

MERCI.

Salut nicodak,

Sub ExecuterTimer()
    [A1] = Format(Now, "hh:mm")
    Application.OnTime Now + TimeValue("00:01:00"), "ExecuterTimer"
End Sub

A+

Si facile ?

Ha ha, quand on sait, on sait ! Merci beaucoup !