Re: Défi de souris ...
Pourquoi avoir posé cette question dans ce fil ?
Mais bon, pour démarrer ta macro par une simple pression sur la touche espace, ce n'est guère possible sans déployer l'usine à gaz, donc il vaut mieux laisser tomber, par contre, pour arrêter ta macro, remplace tout ce que tu as dans ton module 1 par ceci :
Option Explicit
Dim Arret As Boolean
Sub Debut()
Arret = False
Range("B2") = Time
Do
Calculate
DoEvents
Loop Until Arret
End Sub
Sub Fin()
Arret = True
End Sub
et affecte la procédure Fin à ton deuxième bouton