[XL-2003] Somme suivant deux critères

[pouldom]

Bonsoir à tous,

Je souhaite faire le total d'une ligne suivant des critères.

Colonnes a+b+c+d etc..

Je souhaiterais que le total de la ligne ne prenne en compte que les cellules en gras (correspondant aux factures payées) et un autre total pour les factures impayées qui eux restent en écriture normale.

Je vous remercie de votre aide, car je ne sais comment faire.

Cordialement

Dominique.

[jfontaine]

Bonjour,

Je ne connais pas de formule native qui test cela.

Par contre, on peut le faire avec une formule personnalisée

A mettre dans un module

Code :

1
2
3
4
5
6
7
8
9
10
11
12
Function SommeGras(Target As Range, Gras As Boolean) As Double
 
Dim rg As Range
Dim dblSomme As Double
 
For Each rg In Target
    If rg.Font.Bold = Gras And IsNumeric(rg.Value) = True Then dblSomme = dblSomme + rg.Value
Next
 
SommeGras = dblSomme
 
End Function

A utiliser comme cela

Code :

=SommeGras(B1:B11;1)

Le 2 eme argument est à 1 pour la somme des cellules en gras, et 0 pour les non gras

[pouldom]

Bonjour,

Tout d'abord merci pour ta réponse.

Je dois donc créer une fonction sur virtual basic ?

Et =SommeGras(B1:B11;1) , je dois le placer dans la cellule ou sera le total.

Ai je bien compris?

Merci pour votre aide .

Cordialement.

Dom

[jfontaine]

Je dois donc créer une fonction sur virtual basic ?

dans Visual Basic Editor (ALT + F11)

Code :

Et =SommeGras(B1:B11;1) , je dois le placer dans la cellule ou sera le total.

oui

[pouldom]

Bonsoir,

Merci pour ta réponse.

Je vais tester et je te tiens au courant.

Cordialement

DOM

[pouldom]

Bonjour,

Je viens de tester l'application et je n'arrive pas à la faire fonctionner.

En fait, j'ai une colonne O, où je mets la somme à payer et j'ai 2 autres colonnes P= facture payée que je voudrais mettre en gras et Q = facture impayée que je voudrais en normal. Mais que ça se fasse automatiquement.

Cordialement et merci pour votre aide.

Dom

[jfontaine]

Mais que ça se fasse automatiquement.

Qu'est ce qui doit se passer automatiquement?

[pouldom]

Bonjour,

La colonne P en gras et la Q en normal

Cordialement

Dom

[jfontaine]

Si la colonne P doit être en gras, le fait de mettre cette colonne en gras avec la mise ne page ne suffit il pas?

[pouldom]

Bonjour.

Oui pour cette feuille.

Mais je me permets de revenir sur ma question première.

J'ai un tableau avec des colonnes de A à P

Je voudrais que par exemple sur la ligne 10 faire le total de la colonne c à n et que le total des cellules en gras se fassent dans la colonne O et pareil dans colonne P pour les cellules qui sont en normal.

J'ai testé ta formule, mais je n'arrive pas à la faire fonctionner.
Faut il mettre celle ci dans Thiswoork dans visual basic.

Merci de m'aider.

Cordialement

Dom

[spoyet]

Bonjour;

Si j'ai bien compris ton problème, j'ai fais un fichier sommegras, avec la fonction.

Par contre pour l'instant il faut encore aller dans la cellule (de la ligne) colonnes P et Q et cliquez dans le champ et faire entrée pour que la mise à jour se réalise

Je vais voir si je peux améliorer

[pouldom]

bonsoir,

Merci pour ton aide, je l'ai testé et ça fonctionne comme tu l'indiques.

Cordialement

Dom

[pouldom]

Bonjour,

Comment faire pour que le total se fasse automatiquement, sans que avoir à faire le double clic.

Cordialement.

Dom

Et encore merci pour votre aide c'est vraiment très sympa de votre part.