Regrouper des élements dans une seule colonne

salut ,

j'ai un petit problème , j'ai deux colonnes de même type et je dois supprimer les doublons dans les deux colonnes et les disposez dans une seule colonne ,comment faire svp

j'utilise l'instruction suivante pour supprimer les doublons :

ActiveSheet.Range(Cells(1, 1), Cells(derlig, 1)).RemoveDuplicates Columns:=1, Header:=xlNo