VBA revenir sur la dernière cellule modifiée

Merci pour la réponse rapide !
Ca reviendrait à avoir une confirmation avant la modification ?
Je ne maitrise que très peu le VBA et je ne connais pas l'utilisation des variables statiques...
Voici un aperçu de mon code.
Merci de m'indiquer où placer ces variables ?

Sub un_coureur()
'
' un_coureur Macro
' multiplie la distance par 1
'
Select Case ActiveCell.Value

Case "VERT"
GoTo couleurvert

Case "JAUNE"
GoTo couleurjaune

Case "BLEU"
GoTo couleurbleu

Case "ROUGE"
GoTo couleurrouge

Case "VIOLET"
GoTo couleurviolet

Case "NOIR"
GoTo couleurnoir

Case "BLANC"
GoTo couleurblanc

Case "ORANGE"
GoTo couleurorange

Case "AUTRE 1"
GoTo couleurautre1

Case "AUTRE 2"
GoTo couleurautre2

End Select
Exit Sub

couleurvert:
Range("E3").Select
ActiveCell = ActiveCell + 1
Range("H2").Select

Exit Sub

couleurjaune:
Range("E4").Select
ActiveCell = ActiveCell + 1
Range("H2").Select

Exit Sub

couleurbleu:
Range("E5").Select
ActiveCell = ActiveCell + 1
Range("H2").Select

Exit Sub

couleurrouge:
Range("E6").Select
ActiveCell = ActiveCell + 1
Range("H2").Select

Exit Sub

couleurviolet:
Range("E7").Select
ActiveCell = ActiveCell + 1
Range("H2").Select

Exit Sub

couleurnoir:
Range("E8").Select
ActiveCell = ActiveCell + 1
Range("H2").Select

Exit Sub

couleurblanc:
Range("E9").Select
ActiveCell = ActiveCell + 1
Range("H2").Select

Exit Sub

couleurorange:
Range("E10").Select
ActiveCell = ActiveCell + 1
Range("H2").Select

Exit Sub

couleurautre1:
Range("E11").Select
ActiveCell = ActiveCell + 1
Range("H2").Select

Exit Sub

couleurautre2:
Range("E12").Select
ActiveCell = ActiveCell + 1
Range("H2").Select

Exit Sub

End Sub

encore une fois merci pour la rapidité de la réponse
comment puis-je déposer un exemple de mon fichier ?
l'idée des boutons est essentielle pour moi, puisque ce fichier est destiné à être utilisé par des élèves (donc susceptibles de se tromper)
j'ai donc 3 boutons (1 coureur, 2 coureurs et 3 coureurs) que l'on doit cliquer mais j'ai créé également 3 boutons de correction d'erreur qui ne me satisfont pas (il faut cliquer d'abord sur la dernière cellule modifiée). merci pour ton aide

Au lieu des boutons, on peut peut-être utiliser le clic gauche (ou le double clic) pour incrémenter et le clic droit pour décrémenter.
C'est souvent plus simple mais il faut voir le fichier ...
Tu peux déposer ton fichier sur http://cijoint.fr/ ou sur https://www.cjoint.com/ et mettre le lien obtenu dans ton prochain message

Patrice

Voici le lien où est déposé mon fichier.

http://www.cijoint.fr/cjlink.php?file=cj201110/cij1eGPeM7.xlsm
l'idée des clics est à retenir mais ne conviendra sans doute pas pour mon fichier.
ce qui m'intéresse serait un unique bouton qui permettrait d'annuler la dernière modification en cas d'erreur sans avoir à cliquer sur la colonne "total points" puis le bouton correspondant.

Encore merci pour le temps consacré à mon fichier.
Cordialement.

Bonjour Patrice33740
un grand merci pour le temps consacré à mon projet !
ca me convient parfaitement et c'est très facile d'utilisation. Je suis emballé !
J'ambitionne alors d'aller un peu plus loin : j'aimerais pouvoir récapituler sur une seconde feuille tous les résultats (à chaque nouveau clic, les résultats se renseignent au fur et à mesure sur la seconde feuille qu'on ne visionnera qu'à la fin de la séquence).
Malgré mes efforts je n'arrive pas à incorporer dans ton code ces commandes.
Peux-tu me proposer un début de réponse ?
D'avance un immense merci !

mon fichier (enfin le tien !) avec la seconde feuille :
http://www.cijoint.fr/cjlink.php?file=cj201111/cij1Stcamw.xlsm

Patrice, c'est tout bonnement extra !!!
Je te remercie vivement aussi bien pour la qualité de ton travail que pour la rapidité (je me rends pas compte mais pour un expert comme toi, c'est si facile que ça à faire ???!!!)
Je tenterais de m'inspirer de ce fonctionnement pour mes futurs fichiers.
Une nouvelle fois merci, je n'ai plus qu'à utiliser ce super outil avec mes élèves.