Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Obtenir des valeurs non répétées

GILBERTO BRAGA

XLDnaute Occasionnel
Bonjour fórum,

Dans la colone B, j'ai plusieurs valeurs. Dans la colonne E, j'ai besoin d'une formule qui exclut les valeurs répétées de la colonne B, comme indiqué dans la feuille de calcul ci-joint .

Cordialement,

Gilberto
 

Pièces jointes

  • valeurs non répétées.xlsx
    9.5 KB · Affichages: 9

eutrophisation

XLDnaute Occasionnel
Pour exclure les valeurs répétées de la colonne B et afficher uniquement les valeurs uniques dans la colonne E, vous pouvez utiliser la fonction `UNIQUE` disponible dans Microsoft 365. Cette fonction permet de renvoyer une liste de valeurs uniques à partir d'une plage de données.### Utilisation de la Fonction `UNIQUE`Voici comment vous pouvez utiliser la fonction `UNIQUE` dans la colonne E pour obtenir les valeurs uniques de la colonne B :1. **Sélection de la Cellule de Destination :** - Cliquez sur la première cellule de la colonne E où vous souhaitez afficher les valeurs uniques (par exemple, E1).2. **Entrée de la Formule `UNIQUE` :** - Entrez la formule suivante : ```excel =UNIQUE(B:B) ``` - Cette formule va examiner toute la colonne B et renvoyer une liste de valeurs uniques dans la colonne E.### Exemple PratiqueSupposons que vous avez les valeurs suivantes dans la colonne B :| B ||----|| 10 || 20 || 10 || 30 || 20 || 40 |En utilisant la formule `UNIQUE(B:B)` dans la cellule E1, vous obtiendrez les valeurs uniques suivantes dans la colonne E :| E ||----|| 10 || 20 || 30 || 40 |### Notes Importantes- **Plage Dynamique :** En utilisant `B:B`, vous faites référence à toute la colonne B. Si vous avez un grand nombre de données, vous pouvez restreindre la plage pour améliorer les performances, par exemple `B1:B100`.- **Mise à Jour Automatique :** La fonction `UNIQUE` mettra automatiquement à jour la liste des valeurs uniques si des valeurs dans la colonne B sont ajoutées ou modifiées.- **Combinaison avec d'Autres Fonctions :** Vous pouvez combiner `UNIQUE` avec d'autres fonctions comme `SORT` si vous souhaitez trier les valeurs uniques : ```excel =SORT(UNIQUE(B:B)) ```### Démonstration VisuelleVoici une démonstration visuelle de la formule dans Excel :1. **Colonne B :** ``` B1: 10 B2: 20 B3: 10 B4: 30 B5: 20 B6: 40 ```2. **Formule dans E1 :** ``` E1: =UNIQUE(B:B) ```3. **Résultat dans la Colonne E :** ``` E1: 10 E2: 20 E3: 30 E4: 40 ```En suivant ces étapes, vous devriez être en mesure d'exclure les valeurs répétées de la colonne B et de les afficher de manière unique dans la colonne E. Si vous avez d'autres questions ou des besoins spécifiques, n'hésitez pas à me le faire savoir!
 

mapomme

XLDnaute Barbatruc
Supporter XLD
Bonsoir à tous ,

Avec O365, tapez en E2 la formule suivante : =UNIQUE(FILTRE(B2:B999;B2:B999<>""))

edit : @Gégé-45550 désolé pour le doublon , je n’avais pas ouvert ton fichier avant de répondre...
reEdit : @eutrophisation, désolé aussi, je n'avais pas lu ton compact bloc de texte. et donc pas vu que tu avais employé la fonction Unique().
 
Dernière édition:

eutrophisation

XLDnaute Occasionnel
Bonjour,
voir pj.
Cdlt
Voici un code VBA
Bonjour fórum, @eutrophisation, @Gégé-45550, @mapomme et @job75

Merci pour ces excellentes propositions.

Cordialement,

Gilberto
Voici code VBA ExtraireNomsUniques() Dim ws As Worksheet Dim lastRow As Long Dim dict As Object Dim cell As Range Dim i As Long ' Définir la feuille de travail (modifiez "Feuille1" si nécessaire) Set ws = ThisWorkbook.Sheets("Feuille1") ' Trouver la dernière ligne utilisée dans la colonne B lastRow = ws.Cells(ws.Rows.Count, "B").End(xlUp).Row ' Créer un dictionnaire pour stocker les noms uniques Set dict = CreateObject("Scripting.Dictionary") ' Parcourir les valeurs de la colonne B For Each cell In ws.Range("B1:B" & lastRow) If Not dict.exists(cell.Value) And cell.Value <> "" Then dict.Add cell.Value, Nothing End If Next cell ' Copier les noms uniques dans la colonne E i = 1 For Each Key In dict.keys ws.Cells(i, "E").Value = Key i = i + 1 Next Key ' Message de confirmation MsgBox "Extraction des noms uniques terminée !"End Sub
 

Discussions similaires

Réponses
2
Affichages
376
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…