Faire la somme cells comprise entres 2 cells suivant condition
Fermé
Séb
-
3 nov. 2017 à 10:12
ccm81 Messages postés 10543 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 18 mars 2023 - 6 nov. 2017 à 18:13
ccm81 Messages postés 10543 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 18 mars 2023 - 6 nov. 2017 à 18:13
A voir également:
- Faire la somme cells comprise entres 2 cells suivant condition
- Somme si couleur - Guide
- Somme si ens date comprise entre ✓ - Forum Excel
- Jdownloader 2 - Télécharger - Téléchargement & Transfert
- Somme excel - Guide
- 2 comptes whatsapp - Guide
8 réponses
eriiic
Messages postés
24510
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
18 mars 2023
7 166
4 nov. 2017 à 23:44
4 nov. 2017 à 23:44
Bonjour,
merci d'utiliser un site qui n'impose pas de pub stp.
cjoint.com ou mon-partage.fr par exemple.
eric
merci d'utiliser un site qui n'impose pas de pub stp.
cjoint.com ou mon-partage.fr par exemple.
eric
bonjour et merci pour les lien.
Le fichier mis au bon endroit ;)
http://www.cjoint.com/c/GKggwfqWuk3
Le fichier mis au bon endroit ;)
http://www.cjoint.com/c/GKggwfqWuk3
ccm81
Messages postés
10543
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
18 mars 2023
2 336
6 nov. 2017 à 14:05
6 nov. 2017 à 14:05
Bonjour à tous les deux
Essaies ceci
http://www.cjoint.com/c/GKgndSF1H7B
Cdlmnt
Essaies ceci
http://www.cjoint.com/c/GKgndSF1H7B
Cdlmnt
Bonjour et merci pour ta réponse.
je viens de regarder ton fichier avec le plus grand intérêt, c'est exactement ce que je souhaitais, merci.
Par contre, je ne sais pas si cela viens de mon excel, mais lorsque je change une valeur de la feuil2, rien de ce passe dans la feuil1 en D11...
la valeur change bien en colonne M...
Te pourrais, s'il te plait, me faire une explication de texte :) ?
Merci d'avance
Séb
je viens de regarder ton fichier avec le plus grand intérêt, c'est exactement ce que je souhaitais, merci.
Par contre, je ne sais pas si cela viens de mon excel, mais lorsque je change une valeur de la feuil2, rien de ce passe dans la feuil1 en D11...
la valeur change bien en colonne M...
Te pourrais, s'il te plait, me faire une explication de texte :) ?
Merci d'avance
Séb
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
ccm81
Messages postés
10543
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
18 mars 2023
2 336
6 nov. 2017 à 16:19
6 nov. 2017 à 16:19
Tu ajoutes cette instruction qui relance le calcul à chaque changement
T = 0
Application.Volatile
With Sheets(F2)
Cdlmnt
T = 0
Application.Volatile
With Sheets(F2)
Cdlmnt
Merci beaucoup, ca fonctionne nickel.
serais t-il possible d'avoir une explication sur qui fait quoi?
Je sais déjà, que tu déclare T, obj, liobj et limas comme variable.
m, je vois pas...
Tu fais une boucle, sur une colonne "cocom" (colonne D soit composant)
mais après, c'est un peu flou...
merci encore pour le fichier et surout pour l'explication ;)
Séb
serais t-il possible d'avoir une explication sur qui fait quoi?
Je sais déjà, que tu déclare T, obj, liobj et limas comme variable.
m, je vois pas...
Tu fais une boucle, sur une colonne "cocom" (colonne D soit composant)
mais après, c'est un peu flou...
merci encore pour le fichier et surout pour l'explication ;)
Séb
ccm81
Messages postés
10543
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
18 mars 2023
2 336
6 nov. 2017 à 16:48
6 nov. 2017 à 16:48
Quelques explications
Cdlmnt
Option Explicit ' oblige à déclarer les variables utilisées
' constantes décrivant la configuration dans la feuille des données
Const F2 As String = "Feuil2"
Const cocom As String * 1 = "D"
Const comas As String * 1 = "A"
Public Function Total(chapitre As String) As Double
Dim T As Double ' total
Dim obj As Object ' va contenir le resultat de la recherche de chapitre dans F2
Dim liobj As Long ' ligne où chapitre est trouvé
Dim limas As Long ' ligne masse
' initialisation du total
T = 0
' relance le recalcul de total à chaque modification dans le classeur
Application.Volatile
' depuis la feuille F2
With Sheets(F2)
' recherche de chapitre dans la colonne cocom
Set obj = .Columns(cocom).Find(chapitre, , , xlWhole)
' si pas trouvé on va à fin: et total vaudra 0
If obj Is Nothing Then GoTo fin
' ligne où chapitre est trouvé
liobj = obj.Row
' première ligne des masses
limas = liobj + 1
' tant que la colonne comas n'est pas vide
' on ajoute la masse
' on passe à la ligne suivante
While .Range(comas & limas).Value <> ""
T = T + .Range(comas & limas).Value
limas = limas + 1
Wend
End With
fin:
' renvoi du résultat
Total = T
End Function
Cdlmnt
ccm81
Messages postés
10543
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
18 mars 2023
2 336
6 nov. 2017 à 18:13
6 nov. 2017 à 18:13
De rien
Si c'est fini, peux tu mettre le sujet à résolu (en dessous du titre de ton premier message)
Bonne soirée
Si c'est fini, peux tu mettre le sujet à résolu (en dessous du titre de ton premier message)
Bonne soirée