1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
  4. Visual Basic 6
Sujet Précédent Sujet Suivant

Ecriture dans une macro ( somme avec condition ) [Résolu]

Signaler
Messages postés
140
Date d'inscription
lundi 9 juin 2008
Statut
Membre
Dernière intervention
18 avril 2012
 -
Messages postés
140
Date d'inscription
lundi 9 juin 2008
Statut
Membre
Dernière intervention
18 avril 2012
 -
Bonjour
je suis sous excel 2007. je souhaiterais ecrire dans une macro:
fait la somme de la colonne 2 de la ligne 16 a la derniere ligne pleine, dans la cellule (total 1) si "OK" dans la colonne 3 de la ligne 16 a la derniere ligne pleine.


Total 1 Total 2 Total general


Liste

1 2 3

16 PIERRE 100 OK
17 PAUL 225 OK
18 ANDRE 10 NOK
19 MARC 300 OK
20 BERNARD 8 NOK

9 réponses

Réponse 1 / 9
Messages postés
61
Date d'inscription
vendredi 9 novembre 2007
Statut
Membre
Dernière intervention
28 octobre 2011
Pense à l'enregistreur de macro, c'est super utile parfois pour se débloquer !!

@+

Zeps
Réponse 2 / 9
Messages postés
140
Date d'inscription
lundi 9 juin 2008
Statut
Membre
Dernière intervention
18 avril 2012
 1
Quand je mets cette formule dans la feuille cela marche, mais chaque fois que je rajoute une donnee la formule ne suis pas, c'est pour cela que je souhaiterais la mettre dans ma macro. Si quelqu'un a une idee , je suis prenneur. Merci

Total si ok Total si nok Total general
625.00 €
E6
OK
Liste
PIERRE 100 OK
PAUL 225 OK
ANDRE 10 NOK
MARC 300 OK
BERNARD 8 NOK


=SOMME.SI(D8:D50000;E6;D8:C50000)
Réponse 3 / 9
Messages postés
61
Date d'inscription
vendredi 9 novembre 2007
Statut
Membre
Dernière intervention
28 octobre 2011
Bonjour,

As tu activé le calcul automatique ds les options de calcul ?
Il n'y a aucune raison pour que ta formule ne se mette pas à jour automatique;
(essai avec une addition toute bête)

Zeps
Réponse 4 / 9
Messages postés
140
Date d'inscription
lundi 9 juin 2008
Statut
Membre
Dernière intervention
18 avril 2012
 1
le CALCUL AUTOMATIQUE est active. Mais a chaque nouvelle donnees entrees, les parametres de la formule changes. je souhaiterais dons ecrire cette formule dans une macro, mais je ne sais comment faire, je ne sais pas la syntaxe.
Réponse 5 / 9
Messages postés
61
Date d'inscription
vendredi 9 novembre 2007
Statut
Membre
Dernière intervention
28 octobre 2011
chris,

je me rends compte d'un pb ds ta formule :
=SOMME.SI(D8:D50000;E6;D8:C50000)

normalement c'est plutot :

=SOMME.SI(D8:C50000;E6;C8:C50000)
Inversion de la plage D:C => plage avec le critère en 1er et C:C => plage qui effectue la somme en 2ème.
Réponse 6 / 9
Messages postés
140
Date d'inscription
lundi 9 juin 2008
Statut
Membre
Dernière intervention
18 avril 2012
 1
La formule est correcte dans mon fichier, c'est lorsque je l'es ecris ici que je me suis trompe. Tu n'as pas une idee de code pour cette formule a mettre dans ma macro.
Réponse 7 / 9
Messages postés
61
Date d'inscription
vendredi 9 novembre 2007
Statut
Membre
Dernière intervention
28 octobre 2011
Là, tu mets les refs que tu veux

Sub Macro2()
ActiveCell = "=SUMIF(A:B,c1,B:B)"
'A:B => plage cellule
'C1 => critere
'B:B => à sommer si critère = OK
End Sub

Zeps
Réponse 8 / 9
Messages postés
140
Date d'inscription
lundi 9 juin 2008
Statut
Membre
Dernière intervention
18 avril 2012
 1
j'ai ecris le code, et ca marche super bien. Merci je galerais depuis un moment sur ce probleme.je m'etais un ; au lieu d'une virgule. merci encore zeps2
chris
Réponse 9 / 9
Messages postés
140
Date d'inscription
lundi 9 juin 2008
Statut
Membre
Dernière intervention
18 avril 2012
 1
OK MERCI
CHRIS
Répondre Posez votre question