Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel VBA doublon

VBA doublon

2 réponses
Avatar
Jacques
Bonjour,

Je crée un combobox à partir d'une colonne de données mais je voudrais
exclure les doublons.

Comment faire ?

Merci d'avance.
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
SilkRoad
bonjour Jacques

tu peux tester

Dim i As Integer
Dim Cell As Range
Dim Un As New Collection

On Error Resume Next
'filtre les doubons pas collection
For Each Cell In Range("A1:A50")
Un.Add Cell, CStr(Cell)
Next Cell
On Error GoTo 0

'insertion données uniques dans le Combobox
For i = 1 To Un.Count
ComboBox1.AddItem Un(i)
Next i


cordialement
michel



"Jacques" wrote:

Bonjour,

Je crée un combobox à partir d'une colonne de données mais je voudrais
exclure les doublons.

Comment faire ?

Merci d'avance.





Avatar
Jacques
OK merci beaucoup


"SilkRoad" a écrit dans le message de
news:
bonjour Jacques

tu peux tester

Dim i As Integer
Dim Cell As Range
Dim Un As New Collection

On Error Resume Next
'filtre les doubons pas collection
For Each Cell In Range("A1:A50")
Un.Add Cell, CStr(Cell)
Next Cell
On Error GoTo 0

'insertion données uniques dans le Combobox
For i = 1 To Un.Count
ComboBox1.AddItem Un(i)
Next i


cordialement
michel



"Jacques" wrote:

Bonjour,

Je crée un combobox à partir d'une colonne de données mais je voudrais
exclure les doublons.

Comment faire ?

Merci d'avance.