Calcul de profit avec recherche...

[DominicBeauce]

Bonjour à vous,

J'ai un tableau à 3 colonnes. A=catégorie, B= Ventes= C= coutant.

Je recherche à calculer le profit d'une certaine catégorie. Donc à toute les fois que excel trouve la catégorie X, il doit calculer Ventes-coutant/ventes.

Je cherche une formule, je ne peut faire de tri.

Je joint un exemple.

Merci énormément!

 

[CISCO]

Re : Calcul de profit avec recherche...

Bonsoir

Peut être avec

SI(A9=1;(C9-D9)/C9;"")

@ plus

 

[DominicBeauce]

Re : Calcul de profit avec recherche...

Bonsoir

Peut être avec

SI(A9=1;(C9-D9)/C9;"")

@ plus

Oui mais la formule doit faire la somme de tout ces résultats ou il y a un 1

 

[CISCO]

Re : Calcul de profit avec recherche...

Bonsoir

Je n'avais pas bien lu ta demande. Cela ira mieux avec
SOMMEPROD((A9:A19=1)*(C9:C19-D9: D19)/C9:C19)
sans l'espace après les deux points

@ plus

 

[DominicBeauce]

Re : Calcul de profit avec recherche...

A oui la fameuse Sommeprod que je ne pense pas encore d'utiliser. Si jamais il y aurait des ventes à 0 dans le tableau, la formule renvoi un #DIV/0. Ya t'il un argument que l'on peut ajouter à la formule pour quelle ne tienne pas compte des 0 ou quelle ne renvoi pas de #div/0 ?

 

[Calvus]

Re : Calcul de profit avec recherche...

Bonjour,

=SI(ESTERREUR(SOMMEPROD((A9:A19=1)*(C9:C19-D9:D19)/C9:C19));"";SOMMEPROD((A9:A19=1)*(C9:C19-D9:D19)/C9:C19))

Cordialement

 

[R@chid]

Re : Calcul de profit avec recherche...

Bonjour @ tous,
=SIERREUR(Formule;"")
Amicalement

 

[PrinceCorwin]

Re : Calcul de profit avec recherche...

Hello tout le monde,

Avec un petit VBA
Toutes les ventes à 0 (zero) ne sont pas traitées pour ne pas avoir de division/0

Function profit(ByVal mag As String, ByVal ListeMag As Range) As Double
p = 0
'Pour toutes les cellules de la sélection
For Each c In ListeMag
'sont-elles le bon mag
    If c = mag Then
'y a-t-il une vente normale ?
        If c.Offset(, 1) <> 0 Then
'Dans ce cas on ajoute le profit
            p = p + (c.Offset(, 1) - c.Offset(, 2)) / c.Offset(, 1)
        End If
    End If
Next c
profit = p
End Function

utilisation : =profit(B2;B9:B19)
en B2 tu mets le nom du mag.

Bonne route
Zeb