Bonjour,
je souhaite compter le nombre de valeur différente dans une liste. Cette liste est une liste de nom de personne. Puis, j'aimerai copier et coller chacune de ces valeurs distinctes dans une ligne de cellule.
Re : Compter, copier et coller valeurs différentes
Bonjour Mesdames,Messieurs
Si j'ai bien compris
En utiliant le filtre élaboré en cochant sans doublons
Code:
Sub Macro1()
Sheets("Feuil2").Activate
Sheets("Feuil1").Range("A1").CurrentRegion.AdvancedFilter Action:=xlFilterCopy, _
CopyToRange:=Range("A1"), Unique:=True
End Sub
Il faut qu'il n'y ait pas de trous dans la liste de noms
et changer le nom des feuilles avec le bon nom.
Précision: On peut utiliser le filtre élaboré directement sans macro.