Se connecter avec
S'enregistrer | Connectez-vous

[Excel] Temps intermédiaire automatique qd une cellule n'est plus vide

Dernière réponse : dans Programmation

Je fais un classement pour un course à pieds.
Je voudrais qu'à l'arrivée des coureurs, juste en entrant leur numéro de dossard dans une colonne, leur temps d'arrivée se mette automatiquement dans la colonne voisine.
En ayant bien entendu, au préalable lancé le chrono au moment du départ de la course.

Donc par exemple, course de 10km :
en colonne A les dossards
en colonne B les temps d'arrivée

- je lance le chrono au moment du départ de la course.
- le 1er coureur arrive, je rentre son numéro de dossard en A1 ==> automatiquement je voudrais son temps d'arrivée en B1
- le 2ème coureur arrive,...
- ...

Autres pages sur : excel temps intermediaire automatique cellule vide

Lassé par la pub ? Créez un compte
Expert Programmation

Maintenant se dit Now en VB.
Je te propose de gérer l'évenement Worksheet_Change(ByVal Target As Range) de ta feuille. Le paramètre Target est la cellule que je tu es en train de modifier. Avec Offset, il est facile de passer à la cellule d'à-côté.

j'ai trouvé :

Private Sub CommandButton1_Click()
[e1] = Now
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect([B1:B1001], Target) Is Nothing And Target.Count = 1 Then
Application.EnableEvents = False
Target.Offset(0, 3) = Now
Application.EnableEvents = True
End If
End Sub


Après faire simple soustraction :-D
Lassé par la pub ? Créez un compte

Créer un nouveau sujet