probleme de classement

[vivioune]

Bonjour a tous.

J'aimerai que lorsque je click une premiere foi sur le bouton de la feuille1,les valeurs se trouvant dans la colonne A soient copiées sur la ligne1 de la feuille2.(pour ca je crois que j'y suis arrivé)
Lorsque je click une seconde foi sur le bouton les valeurs de la colonne A sont copiées sur la ligne2 de la feuille2 et ainsi de suite...
C'est une boucle et une incrementation,je pense avec n en variable.

Tout ceci pour réaliser un tableau(en colonne)et pouvoir en tirer des graphes(mais bon c'est pas pour tout de suite je pense...)





Voir fichier joint.

 

[vivioune]

oups je crois que j'ai oublié de joindre mon fichier.
désolé
merci.

 

[CBernardT]

Bonsoir Vivioune,


Un essai de macro :

Sub Transfert()
Dim Lig1 As Integer, Lig2 As Integer, i As Integer

Lig1 = Sheets('Feuil1').Range('A65536').End(xlUp).Row
Lig2 = Sheets('Feuil2').Range('A65536').End(xlUp).Row + 1

For i = 1 To Lig1
Sheets('Feuil2').Cells(Lig2, i) = Sheets('Feuil1').Cells(i, 1)
Next i
End Sub

Cordialement

Bernard