Discussion :

[climber91]

Bonjour à tous,

J'ai ce matin une petite macro à créer et j'ai un peu de mal. Pour faire simple, en case A1 de la feuille 1 de mon classeur j'ai une chaine de caractéres ("soleil" par exemple). Je souhaite copier cette chaine en case A1 de la feuille 2. Jusqu'ici pas de soucis. Le lendemain, en feuille 1 et cellule A1, j'écris "pluie" par dessus "soleil". Je souhaite qu'en lancant la même macro, excel me copie "pluie" mais en cellule A2 cette fois ci de la feuille 2. En gros la feuille 2 me servirait d'archivage.

Je n'arrive pas à trouver la fonction pour incrémenter des lignes pour la copie.

D'avance merci de votre aide.

Cordialement

Climber91

[mercatog]

Bonjour,
à mettre sur l'évènement Change de ta feuille Feuil1
à chaque changement de la valeur de la cellule A1 de Feuil1, l donnée sera copiée en fin de colonne A de Feuil2

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then Target.Copy Sheets("Feuil2").Cells(Rows.Count, "A").End(xlUp).Offset(1, 0)
End Sub

[climber91]

Merci beaucoup de ta réponse.

Par contre, je débute tout juste, je comprends pas bien ce que je dois faire