Calculer les gallons et les litres

[Clochard]

Bonjour le Forum,
J'aimerais réussir a calculer le total de gallons et de litres séparément...
J'ai besoin de votre aide...
Merci beaucoup

Clochard

 

[JHA]

Bonjour à tous,

Par VBA avec extraction du format de nombre, 2 solutions:
Avec lire.cellule
Avec fonction personnalisée (forum.excel-pratique.com)
Je n'ai pas trouvé sans colonne sup car je suis une quiche en VBA.

JHA

 

[Modeste geedee]

Bonjour le Forum,
J'aimerais réussir a calculer le total de gallons et de litres séparément...
J'ai besoin de votre aide...
Merci beaucoup

Clochard

Comment est défini le format de cellules ???(manuellement ...?)

actuellement ce qui est > 16,2 unités est litre, le reste gallon ????

​

=SOMME.SI(E4:E100;"<=16,2")
=SOMME.SI(E4:E100;">=16,2")

 

[Clochard]

Merci JHA et Modeste....

Modeste... C'est vraiment une façon intéressante de voir mon problème...
C'est apprécié
Merci
Clochard

 

[eriiic]

Bonjour,

tant qu'à mettre du vba, dans un module standard :

Function sommeParUnité(plage As Range, unité As String) As Double
    Dim datas, lig As Long, col As Long, f As String
    datas = plage.Value
    For lig = 1 To UBound(datas, 1)
        For col = 1 To UBound(datas, 2)
            f = Application.Trim(Split(Split(plage.Cells(lig, col).NumberFormat, ";")(0), """")(1))
            If f = unité Then sommeParUnité = sommeParUnité + datas(lig, col)
        Next col
    Next lig
End Function

sur feuille :

=sommeParUnité($E$4:$E$27;"gallons")

eric