heure en permanence

[Bidule]

Bonjours je souhaiterai que dans ma feuille une cellule affiche en permanence l'heure qu'il est comment faire????

 

[Eric C]

Bonjour le forum
bonjour Bidule

Voici un code à copier dans un module :

Option Explicit

Sub Start_Clock()
Application.OnTime Now + TimeValue('0:0:01'), 'SetClock'
End Sub

Private Sub SetClock()
Range('A1').Value = Format(Now, 'HH:MM:SS')
Start_Clock
End Sub

Puis le code à copier dans ThisWorkBook

Private Sub workbook_open()
Start_Clock
End Sub

Bonne fin d'A/M à toutes & à tous

 

[andré]

Salut Bidule et Eric,

Il ya aussi ce post :
Lien supprimé

Â+

Message édité par: andré, à: 15/12/2005 16:26