Bonjour,
J'aimerai pour pouvoir gagner du temps réaliser une macro qui me permettrait de copier coller une colonne à la suite de l'autre puis supprimer les doublons.
Pour supprimer les doublons, ok je me suis appuyé sur l'enregistreur de macro puis j'ai récupéré les lignes qu'il me fallait.
Pour ce qui est du copié collé, j'ai un peu plus de mal, j'utilise donc pour copier ma colonne A de la feuille 1 à la feuille 3 :
"With Worksheets("Feuille1")
.Columns("A").Copy
End With
'Coller en feuille 3 en colonne A et supprimer les doublons
With Sheets("feuil3")
.Columns("A").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
.Range("$A$3:$A$10000").RemoveDuplicates Columns:=1, Header:=xlNo.
Maintenant, la ou je bloque, copier la colonne B de la feuille 2 en A de la feuille 3, à partir de la première ligne vide.
'Je déclare donc des variables
PremièreLigneVide = .Cells(.Rows.Count, "A").End(xlUp).Row-1
End With
Je décide de copier la colonne B feuille 2 sans l'en tête, j'utilise donc .Range, de la première donnée à copier jusqu'à la première ligne vide.
With Sheets ("Feuil2"),
DernièreLigneVideFeuil2=.Cells(.Rows.Count, "B").End(xlUp).
.Range("B3:B" & DernièreLigneVideFeuil2).Copy
End With
With Sheets("Feuil3").
Et la je ne sais donc pas quoi faire, enfin je ne sais pas comment tourner la formule,
merci d'avance de vos réponses,
El Blanco
"C'est en travaillant que l'on travail"