La fonction SUM avec colonne variable
imaneyass
-
ccm81 Messages postés 10909 Date d'inscription Statut Membre Dernière intervention -
ccm81 Messages postés 10909 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
je retrouve un problème dans le cadre de mon stage,
je veux faire des sommes sur plusieurs cellules dont la colonne est variable, cette variable est déterminée dans une autre procédure qui fait appel à ces sommes, j'ai utilisé cette syntaxe mais en vain.
Sub test(AC As String)
Sheets("Feuil4").Activate
Range("A1").Formula = "=SUM(EtatsFin!AC & 10, -EtatsFin!AC & 11)"
End Sub
Sub TEST()
Call imane("B")
End Sub
SVP aidez moi, j'en serais très reconnaissante.
je retrouve un problème dans le cadre de mon stage,
je veux faire des sommes sur plusieurs cellules dont la colonne est variable, cette variable est déterminée dans une autre procédure qui fait appel à ces sommes, j'ai utilisé cette syntaxe mais en vain.
Sub test(AC As String)
Sheets("Feuil4").Activate
Range("A1").Formula = "=SUM(EtatsFin!AC & 10, -EtatsFin!AC & 11)"
End Sub
Sub TEST()
Call imane("B")
End Sub
SVP aidez moi, j'en serais très reconnaissante.
A voir également:
- La fonction SUM avec colonne variable
- Fonction si et - Guide
- Déplacer colonne excel - Guide
- Trier colonne excel - Guide
- Colonne word - Guide
- Formule somme excel colonne - Guide
5 réponses
Bonjour,
"=SUM(EtatsFin!AC10, -EtatsFin!AC11)"
jordane45
Messages postés
38486
Date d'inscription
Statut
Modérateur
Dernière intervention
4 753
et si "10" et "11" doivent être remplacés par des variables...
imaneyass
Merciiiiiiii ça fonctionne parfaitement chez moi!
imaneyass
Bonjour Jordane, j'ai cru que ça marche mais en faite non, ça donne toujours la valeur 0.
Bonjour à tous les deux
Les propositions de Jordane45 fonctionnent bien, tu as peut être un problème ailleurs
Un test
https://www.cjoint.com/c/HGzmvDxSM7B
Cdlmnt
Les propositions de Jordane45 fonctionnent bien, tu as peut être un problème ailleurs
Un test
https://www.cjoint.com/c/HGzmvDxSM7B
Cdlmnt
Je suppose que c'est avec ton fichier que ça coince, peux tu envoyer un bout de ton fichier sur cjoint.com et joindre le lien obtenu à ton prochain message. N'oublies pas d'y ajouter des explications et des exemples de résultat attendu
1) Tu vas dans https://www.cjoint.com/
2) Tu cliques sur [Parcourir] pour sélectionner ton fichier
3) Tu descends en bas de la page pour cliquer sur [Créer le lien Cjoint]
4) Au bout de quelques secondes la deuxième page s'affiche, avec le lien
en bleu souligné ; tu le sélectionnes et tu fais "Copier"
5) Tu reviens dans ta discussion sur CCM, et dans ton message de réponse tu fais "Coller".
Cdlmnt
1) Tu vas dans https://www.cjoint.com/
2) Tu cliques sur [Parcourir] pour sélectionner ton fichier
3) Tu descends en bas de la page pour cliquer sur [Créer le lien Cjoint]
4) Au bout de quelques secondes la deuxième page s'affiche, avec le lien
en bleu souligné ; tu le sélectionnes et tu fais "Copier"
5) Tu reviens dans ta discussion sur CCM, et dans ton message de réponse tu fais "Coller".
Cdlmnt
Essaies
Cdlmnt
Sub imane(AC As String)
Sheets("Feuil1").Activate
ActiveSheet.Range("B12").Formula = "=SUM(Feuil1!" & AC & 8 & ",-Feuil1!" & AC & "9)"
End Sub
Cdlmnt
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
RQ1. Pour faire une simple soustraction, pas besoin de la fonction SOMME
RQ2. Le fait de construire la formule dans une variable, ici f, te permet en exécutant pas à pas de contrôler sa validité
Cdlmnt
RQ2. Le fait de construire la formule dans une variable, ici f, te permet en exécutant pas à pas de contrôler sa validité
Sub imane(AC As String)
Dim f As String
f = "=Feuil1!" & AC & 8 & "-Feuil1!" & AC & "9"
Sheets("Feuil1").Activate
ActiveSheet.Range("B12").Formula = f
End Sub
Cdlmnt
Pas de problème
Si c'est fini, peux tu mettre le sujet à résolu (en haut à droite, la roue dentée)
RQ. Tu peux écrire tes formules en français, attention au ";" à la place de la ","
Bon stage
Si c'est fini, peux tu mettre le sujet à résolu (en haut à droite, la roue dentée)
RQ. Tu peux écrire tes formules en français, attention au ";" à la place de la ","
Sub imane(AC As String)
Dim f As String
f = "=SOMME(Feuil1!" & AC & 8 & ";-Feuil1!" & AC & "9)"
Sheets("Feuil1").Activate
ActiveSheet.Range("B12").FormulaLocal = f
End Sub
Bon stage