VBA coller deux colonne en une sans doublon Fermé

Question

Bonjour, Je commence en VBA et j'ai présentement un problème. Je désire coller deux colonnes A:A et C:C (provenant de deux onglets différents du même fichier) dans un autre onglet de ce fichier, mais dans la même colonne, soit une à la suite de l'autre et ensuite effacer les doublons. Je n'y arrive pas. 

Merci pour votre aide.

ccm81 · Answer

Bonjour

Un début de réponse
https://www.cjoint.com/?3BdvrQ0XOJq 

Cdlmnt

OLCO · Answer

Réglé. Merci

Sub liste_entité()
Dim classeur As Workbook

Set classeur = ActiveWorkbook

classeur.Sheets("Feuil1").Activate
Columns("A:A").Select
Selection.Copy
classeur.Sheets("Liste").Activate
Range("A1").Select
ActiveSheet.Paste

classeur.Sheets("feuil2").Activate
Columns("B:B").Select
Selection.Copy
classeur.Sheets("Liste").Activate
Range("B1").Select
ActiveSheet.Paste

Range("A2:A" & [A100000].End(xlUp).Row).Select
Selection.Copy
Range("B100000").End(xlUp).Offset(1, 0).Select
ActiveSheet.Paste

Columns("A:A").Select
Selection.Delete Shift:=xlToLeft

Columns("A:A").Select
ActiveSheet.Range("$A$1:$A$10000").RemoveDuplicates Columns:=1, Header:=xlYes

End Sub

VBA coller deux colonne en une sans doublon

2 réponses

Discussions similaires