Copie
Bonjour le site. Je suis débutant, ma question, je désirerai réaliser une macro qui copie les données des cellules C1,C2,C3 dans la colonne A dernière ligne vide donc à la suite des données de la colonne A. Merci pour vos réponses
3 réponses
-
ModérateurBonjour,
Pour trouver la dernière ligneDerniere_Ligne = Cells.Find("*", Range("A1"), , , xlByRows, xlPrevious).Row
Pour ce qui est de la copie... tout dépend.
Veux tu réellement "copier" la cellule comme tu le ferais avec un copier/coller .... ou simplement récupérer les valeurs (ce qui serait préférable....).
Pour les valeurs.. il te suffit d'utiliser le propriété "value"cells(Derniere_Ligne +1 ,1).value = cells(1,3).value ' pour la première valeur
-
Merci pour la réponse. En fait dans la colonne A, j'ai des données qui évoluent.Dans la colonne C je rentre de nouvelles données et je voudrai connaître quelle macro il faut utiliser pour les transférer dans A à la suite. on me dit d'effectuer une boucle mais je ne sais pas faire.J'espère que mon information sera suffisante.
-
ModérateurAucune boucle n'est utile pour faire ce que tu nous indiques... tu peux utiliser la méthode worksheet_change pour détecter les modifications dans la colonne C
Ensuite, simplement utiliser la "valeur modifiée" (ou ajoutée) et la mettre dans la colonne A.
https://docs.microsoft.com/fr-FR/office/vba/api/Excel.Worksheet.Change
https://silkyroad.developpez.com/VBA/EvenementsFeuille/
-
-
Jordane45, j'ai bien compris ta macro mais comment faire dans ce cas pour les 2 autres données de C. Je voudrai éviter d'écrire 3 fois pour les 3 valeurs de C qui pourraient être 4 ou autres
Merci
