Récupérer les valeurs uniques

Bonjour,

Fonction perso:

http://boisgontierjacques.free.fr/fichiers/fonctionsperso/FonctionSansDoublo ns3.xls

JB


On 9 fév, 15:46, JLuc <ns.jeanluc.laur...@free.fr.ns> wrote:

Bonjour les lecteurs,
Dans un tableau de 5 colonnes * 10 lignes (plage nommée "valeurs"),
j'ai des valeurs différentes ou identiques. Comment puis je récupére r
toutes les valeurs uniques dans une autre colonne ?
Mon but est de faire des calculs sur les écarts types (je suis pas
encore arrivé, mais je desespere pas :D)
Merci pour vos reponses

--
               ____
             ( O | O )
                  --
_oooO_  JLuc  _Oooo_

              O-O

*Bonjour JB*,
Merci pour ces belles fonctions
JLuc

Bonjour,

Fonction perso:

http://boisgontierjacques.free.fr/fichiers/fonctionsperso/FonctionSansDoublons3.xls

JB


On 9 fév, 15:46, JLuc <ns.jeanluc.laur...@free.fr.ns> wrote:

Bonjour les lecteurs,
Dans un tableau de 5 colonnes * 10 lignes (plage nommée "valeurs"),
j'ai des valeurs différentes ou identiques. Comment puis je récupérer
toutes les valeurs uniques dans une autre colonne ?
Mon but est de faire des calculs sur les écarts types (je suis pas
encore arrivé, mais je desespere pas :D)
Merci pour vos reponses

--
               ____
             ( O | O )
                  --
_oooO_  JLuc  _Oooo_

              O-O

--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O

et ceci : La plage de données ayant le nom "Plg"

'-------------------------------
Sub test()
Dim T(), x As Integer, Rg As Range

With Worksheets("NomDeTaFeuille")
Set Rg = .Range("Plg")
For Each c In Rg
If Application.CountIf(Rg, c) = 1 Then
ReDim Preserve T(x)
T(x) = c
x = x + 1
End If
Next
Rg(1, Rg.Rows.Count).Resize(UBound(T) + 1) = _
Application.Transpose(T)
End With

End Sub
'-------------------------------



"JLuc" <ns.jeanluc.laurent@free.fr.ns> a écrit dans le message de news:
mn.4bb27d82b0c943bf.40692@free.fr.ns...
Bonjour les lecteurs,
Dans un tableau de 5 colonnes * 10 lignes (plage nommée "valeurs"),
j'ai des valeurs différentes ou identiques. Comment puis je récupérer
toutes les valeurs uniques dans une autre colonne ?
Mon but est de faire des calculs sur les écarts types (je suis pas
encore arrivé, mais je desespere pas :D)
Merci pour vos reponses

--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O