Autres Fonction UNIQUE pour excel 2007

[thejackyshow]

Bonjour à tous,
J'ai vu via un tuto la nouvelle fonction UNIQUE. Magnifique fonction mais malheureusement ne peut pas être appliqué sur excel 2007.

Ma question est la suivante : es-ce qu'il y a une formule qui ferait office de fonction UNIQUE?

Merci d'avance pour vos réponses

 

[job75]

Bonjour thejackyshow,

C'est vraiment très classique, formule matricielle en C2 du fichier joint :

=SIERREUR(INDEX(A:A;PETITE.VALEUR(SI(NON(NB.SI(C$1:C1;A$2:A$8));LIGNE(A$2:A$8));1));"")

à valider par Ctrl+Maj+Entrée.

A+

 

[sylvanu]

Bonsoir,
Une piste de substitution :

Comment extraire une liste de valeurs uniques par formule | XL Business Tools

Voici une formule fort utile pour extraire une liste de valeurs uniques dans une colonne de données. Sur le même thème, vous pourriez également être intéressé par l'article Comment compter le nombre de valeurs uniques dans un tableau. 📑 EDIT : Extraire une liste de valeurs uniques avec la...

xlbusinesstools.com

 

[thejackyshow]

@job75 merci pour la formule.

Je l'ai testé sur mon tableau mais le résultat n'est pas concluant de mon côté.
Je mets mon fichier en pièce jointe pour avoir ton éclairci.

Dans mon cas, il faut que le résultat se trouve en A9 en fonction de la liste des pays en colonne E.

Je suppose qu'une fois le problème résolu, mettre les formules l'un derrière l'autre pour qu'il prend en compte les 3 listes de pays.

 

[goube]

Bonsoir à tous,

Une proposition avec des TCD
Cordialement.

 

[thejackyshow]

Merci @goude c'est ce que j'avais fait avant mais j'essaie d'automatiser car avec un TDC il faut penser à actualiser

 

[goube]

Re,

Pour actualiser en automatique. VBA dans la feuille qui contient le TCD

Private Sub Worksheet_Activate()
    ThisWorkbook.RefreshAll
End Sub

Cordialement.

 

[job75]

Formule matricielle en A9 de la feuille SYNTHESE :

=SIERREUR(INDEX(E:E;PETITE.VALEUR(SI(NON(NB.SI(A$8:A8;E$4:E$30));LIGNE(E$4:E$30));1));SIERREUR(INDEX(I:I;PETITE.VALEUR(SI(NON(NB.SI(A$8:A8;I$4:I$33));LIGNE(I$4:I$33));1));SIERREUR(INDEX(M:M;PETITE.VALEUR(SI(NON(NB.SI(A$8:A8;M$4:M$33));LIGNE(M$4:M$33));1));"")))

Bonsoir goube.

 

[job75]

La formule indiquée par sylvanu est plus légère, voyez ce fichier (2) et la formule matricielle en A9 :

=SIERREUR(INDEX(E$4:E$30;EQUIV(0;NB.SI(A$8:A8;E$4:E$30);0));SIERREUR(INDEX(I$4:I$33;EQUIV(0;NB.SI(A$8:A8;I$4:I$33);0));SIERREUR(INDEX(M$4:M$33;EQUIV(0;NB.SI(A$8:A8;M$4:M$33);0));"")))

 

[Dranreb]

Bonsoir.
Pour information plus qu'autre chose, une fonction perso utilisant une fonction de service de la ressource indiquée en lien à la fin, servant à établir des listes dynamiques pour ComboBox d'UserForm :

Function UNIQUE(ByVal Src) As Variant()
   Dim TArg(), TRés(), L As Long
   TArg = CLsCAs.MSujetCBx.SujetCBx(Src)(0)
   ReDim TRés(1 To Application.Caller.Rows.Count, 1 To 1)
   For L = 1 To UBound(TRés, 1)
      If L < UBound(TArg) + 2 Then TRés(L, 1) = TArg(L - 1) Else TRés(L, 1) = ""
      Next L
   UNIQUE = TRés
   End Function

Les éléments de la liste sont de plus classés par ordre alpha.

ComboBox liées et contrôles associés

Définit deux types d'objets à évènements: ComboBoxLiées prenant en charge les ComboBox pour la saisie des données d'identification de la ligne à créer, puis, ultérieurement, à consulter voire modifier, et ControlsAssociés prenant en charge les...

www.excel-downloads.com

 

[thejackyshow]

Merci @job75 et @sylvanu pour vos formules c'est ce que je recherchais.

Par contre je n'arrive pas à trier en fonction du nombre de victoire. Quand je met les entêtes (PAYS, Nbre) en filtre pour trier rien ne se passe.
Es-ce que ce serait du fait qu'il y a des formules dans les cellules?

 

[BOISGONTIER]

Bonjour,

Fonction perso UniqueTrié(champ;ColTri) multi-colonnes.


=UniqueTrié(A2:B20;1)

Boisgontier

 

[job75]

Merci @job75 et @sylvanuPar contre je n'arrive pas à trier en fonction du nombre de victoire. Quand je met les entêtes (PAYS, Nbre) en filtre pour trier rien ne se passe.

Si l'on veut faire un classement c'est le tableau source (aménagé) qu'il faut trier, voyez ce fichier (3).

Salut Bernard, JB.

 

[thejackyshow]

Merci @job75
@BOISGONTIER je ne pas utiliser les fonctions UNIQUE et TRI car j'ai excel 2007, sinon mes problèmes furent plus simple à régler