Rebonjour,
En fait tu n'as que la dernière ligne à ajouter à la fin de ton code :
Range("Heure_Dernier") = Time
Il faut bien sûr nommer la cellule où va s'afficher l'heure (je l'ai nommée "Heure_Dernier" dans mon exemple)
Au fait, dans mon petit exemple, la ligne Heure = Time ne sert à rien.
@+