Bouton suivant

Bonsoir

comment faire pour que

quand je clique sur le bouton "Course suivante" dans l'onglet mes jeux

il me mette EN A12 Course B12 l'heure en C12 la date en D12 réunion E12 n°course F12 n°cheval

toutes ces information il et a dans l'onglet Sélection

de A2:A38 de B2:B38 C2:C38 D2:D38 E2:E38 F2:F38

merci de votre aide

21the-system.xlsx (202.95 Ko)

Bonjour,

à tester,

Sub Course_Suivante()
Dim rw As Long, sh As Worksheet
Set sh = Sheets("Sélection")
rw = sh.Cells(Rows.Count, 1).End(xlUp).Row + 1
sh.Cells(rw, "A") = sh.Cells(rw - 1, 1).Value + 1
sh.Cells(rw, "B") = Range("B12").Value
sh.Cells(rw, "C") = Range("C12").Value
sh.Cells(rw, "D") = "R" & Range("D12").Value
sh.Cells(rw, "E") = Range("E12").Value
sh.Cells(rw, "F") = Range("F12").Value
End Sub

ou bien j'ai mal compris et c'est le contraire qu'il faut faire ?

à voir,

Bonjour

c'est ça mais il faudrait que a chaque fois que je clique sur le bouton "Course suivante" dans l'onglet mes jeux

les courses se mette l'une sous l'autre

mais uniquement quand je clique sur le bouton "Course suivante"

merci pour votre aide

Bonjour ilienfrancois, Isabelle , le forum,

En attendant la proposition d'Isabelle....

34the-system2.xlsm (220.46 Ko)

Cordialement,

merci beaucoup

Rechercher des sujets similaires à "bouton suivant"