Casse tête pr les formulistes, fonction SI,double conditions + somme plage restreinte

[SiD88]

Bonjour le forum,

J'ai 2 colonnes, une de chiffres, une avec une double réponse (FAUX FAUX ou FAUX VRAI ou VRAI FAUX ou VRAI VRAI).

Je dois faire la somme des chiffres de la colonne A, ayant la condition VRAI VRAI, qui se suivent, antecedent à la condition VRAI FAUX.

Voir le fichier en pj, plus clair que des mots.


Merci à l'avance

 

[job75]

Re : Casse tête pr les formulistes, fonction SI,double conditions + somme plage restr

Bonjour SiD88,

Avec VBA c'est rarement un casse-tête :

Function SOMMESIVRAIVRAI(plage As Range) As Double
Dim fin&, deb&
fin = plage.Rows.Count
For deb = fin - 1 To 1 Step -1
  If plage(deb, 2) <> "VRAI VRAI" Then Exit For
Next
deb = deb + 1
If deb < fin Then SOMMESIVRAIVRAI _
  = Application.Sum(plage(deb, 1).Resize(fin - deb + 1))
End Function

Fichier joint.

Edit : enlever If deb < fin Then si l'on veut la valeur même s'il n'y a pas de "VRAI VRAI" au dessus.

A+

 

[SiD88]

Re : Casse tête pr les formulistes, fonction SI,double conditions + somme plage restr

Bonjour job75,

Ça marche inpect.


Merci

a+

 

[job75]

Re : Casse tête pr les formulistes, fonction SI,double conditions + somme plage restr

Re,

Finalement par formule ce n'est pas trop casse-tête.

Fichiers joints.

Edit : deux remarques :

1) on peut se passer du nom défini LigDeb mais il faudra alors valider matriciellement les formules (Ctrl+Maj+Entrée)

2) si le tableau est très grand les calculs seront longs, la solution VBA sera bien plus rapide.

A+