Dans le fichier exemple joint, dans ma Sub ImportCSV ... je veux créer des listes sans Doublon issuent de données dans une colonne d'un autre onglet.
Je m'en sors ... SAUF QUE la donnée de la première ligne coté 'source' (si on la retrouve dans les autres lignes de la source) ... n'est pas Unique dans la copie de 'Destination'.
Pour copier les données (de la plage source vers la cible) j'utilise ce code :
Caution: When you are using Advanced Filter to get the unique list, make sure you have also selected the header. If you don’t, it would consider the first cell as the header.
Hello
peut etre une histoire de ligne d'entete incluse ou pas dans le filtre?
parce que si tu commences à A1, il n'y a plus le doublon
Worksheets("BDD").Range(Range("A1"), Range("A20000").End(xlUp)).Select
Caution: When you are using Advanced Filter to get the unique list, make sure you have also selected the header. If you don’t, it would consider the first cell as the header.
Dans la mesure où AdvancedFilter prend forcément en compte les entêtes, l'astuce consiste à supprimer la cellule et de décaler vers le haut. à retester, vérifier, conrôler, bien sûr !
Bonjour,
un grand merci pour vos infos je devrais pouvoir m'en sortir
@job75 : le projet commence à peine et vu que je n'ai pas fait un vrai projet VBA depuis un paquet d'année (c'est plus mon mon métier ), je passe par un phase avec les Activate et Select pour être certain que cela fait ce que je veux que cela fasse. Je ferais du nettoyage plus tard
[Edit] et J'espère que cela va mieux de ton coté ... Bon courage à toi.