VBA pour extraire les unique de deux colonnes jointes

Bonjour ,

J'ai un fichier contenant des centaines de lignes de données .

Je joins un modèle dans lequel je montre uniquement les colonnes B , D .

Je dois copier les valeurs uniques distinctes des deux colonnes jointes .

La macro doit donc copier les valeurs uniques distinctes des deux colonnes et les coller sur la feuille 2 dans les colonnes E , F .

Voici aussi un très bon modèle de macro ici que j'ai trouvé sur internet, mais le problème c'est que cette macro sur internet supprime les lignes .

Je dois copier les colonnes distinctes uniques et les coller sur la feuille 2 .

Dans le fichier joint, le résultat attendu de la macro est déjà dans les colonnes E , F de la feuille 2 .

nota: J'ai besoin que cette opération soit faite par macro .

Bonsoir star, le forum,

Si j'ai bien compris la demande, voici une macro qui copie les données uniques à l'activation de la feuille "Feuil2".

Bons tests.

Cordialement.

AL 22

Bonsoir à touss,

une autre tentative :

Sub CopieSupprDoublons()
   Application.ScreenUpdating = False
   Sheets("Feuil1").Columns("b:b").Copy Sheets("Feuil2").Columns("e:e")
   Sheets("Feuil1").Columns("d:d").Copy Sheets("Feuil2").Columns("f:f")
   Sheets("Feuil2").Columns("e:f").RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes
End Sub

bonsoir

pour les privés ou interdits de VBA

cordialement

Bonjour messieurs : AL22 , mafraise , tulipe_4 ,

vos contributions m'ont beaucoup aidé .

Merci à tous pour votre aide et votre contribution .