Excel - Recopier les prix sans doublons

Trouver les prix sans doublons=20
Bonsoir =E0 tous,

J'aimerais =E9crire tous les prix sans doublons des articles pr=E9sents dan=
s la colonne M, depuis la colonne C.

Mais voila, dans mon exemple en PJ, il y a quand m=EAme des doublons. ($P$4=
et $P$7 en jaune)

Une correction du fichier en PJ ?

Merci.

http://cjoint.com/?BEhpXJkLllr

Bonjour,

Et si tu prenais le temps d'expliquer ce que tu veux pr?cis?ment?

Tu as 2 endroits o? tu as des carottes de 40 et de 60 euros.
Pendant ce temps, tu as aussi du Fromage pour 60 euros.

Lorsque tu fais un filtre avanc? ayant comme crit?re seulement sur le prix, Excel retient
la premi?re occurrence de chacun des prix nonobstant que ce soit du formage ou
des carottes. Le moins que l'on puisse dire, c'est une dr?le de mani?re de faire un
filtre!



MichD
---------------------------------------------------------------

Bonsoir Denis,

Je veux seulement r=E9cup=E9rer les d=E9f=E9rents prix pour un seul article=
, ensuite calculer la moyenne de ces prix.

Je cherche pourquoi cette ligne ne fonctionne pas si un prix est d=E9j=E0 i=
nscrit dans la ligne Nx:Yx :

'----------------
Set y =3D Cells(x.Row, 14).Resize(1, 199).Find(c.Offset(0, 1).Value, lookat=
'---------------------

Bonjour
De ce que je comprends .....
Tu fais un filtre sur la colonne "fromage", puis tu appliques la fonction
SOUS.TOTAL(moyenne) dans la colonne des prix ;
Bon, on ne va pas en faire tout un plat, de ce fromage ... -))))

Jacquouille

26086001.436.1336490392190.JavaMail.geo-discussion-forums@ynss14...

Bonsoir Denis,

Je veux seulement r?cup?rer les d?f?rents prix pour un seul article, ensuite
calculer la moyenne de ces prix.

Je cherche pourquoi cette ligne ne fonctionne pas si un prix est d?j?
inscrit dans la ligne Nx:Yx :

'----------------
Set y = Cells(x.Row, 14).Resize(1, 199).Find(c.Offset(0, 1).Value,
lookat:=xlWhole)
'---------------------

Si tu veux trouver la moyenne de prix pour l'ensemble des items uniques dans
la liste B1:B17

'--------------------------------------------
Sub test()
Dim LaMoyenne As Currency, DerLig As Long
Application.ScreenUpdating = False
With Worksheets("Feuil1")
With Range("B:C")
DerLig = .Find(What:="*", _
LookIn:=xlFormulas, _
SearchOrder:=xlByRows, _
SearchDirection:=xlPrevious).Row
End With
With .Range("B1:C" & DerLig)
.AdvancedFilter xlFilterInPlace, , , True
LaMoyenne =
Application.Sum(.Columns(2).SpecialCells(xlCellTypeVisible).Cells) _
/
Application.Count(.Columns(2).SpecialCells(xlCellTypeVisible).Cells)
.Parent.ShowAllData
End With
End With
Application.ScreenUpdating = True
MsgBox LaMoyenne & " des prix pour les diff?rents items"
End Sub
'--------------------------------------------




26086001.436.1336490392190.JavaMail.geo-discussion-forums@ynss14...

Bonsoir Denis,

Je veux seulement r?cup?rer les d?f?rents prix pour un seul article, ensuite
calculer la moyenne de ces prix.

Je cherche pourquoi cette ligne ne fonctionne pas si un prix est d?j?
inscrit dans la ligne Nx:Yx :

'----------------
Set y = Cells(x.Row, 14).Resize(1, 199).Find(c.Offset(0, 1).Value,
lookat:=xlWhole)
'---------------------

Bonjour,

Une petite question par curiosit=E9 : =E7a correspond =E0 quoi, en=20
statistiques, la moyenne des =E9l=E9ments uniques ?

Bonsoir Denis,

Ce que j'espere avoir, c'est l'affichage des prix uniques de chaque article=
dans le mois en cours, ensuite calculer la moyenne des prix pour les artic=
les qui ont vari=E9s plus d'un prix par mois.

Bonjour Gloops,

Je ne sais pas !

Tu peux me le dire ?