VBA excel pb fonction sum
Résolu
ori05
Messages postés
57
Statut
Membre
-
ori05 Messages postés 57 Statut Membre -
ori05 Messages postés 57 Statut Membre -
Bonjour,
est ce que quelqu'un pourrait m'expliquer pourquoi ceci ne marche pas ? et éventuellement comment résoudre le problème ??
ligne = Sheets("SITE PREPARATION").Range("total").Row
Set plage = Sheets("SITE PREPARATION").Range(Cells(93, 3), Cells((ligne - 1), 3))
Sheets("SITE PREPARATION").Range("eq_quantity").FormulaR1C1 = "=SUM(" & plage & ")"
J'ai plus au moins résolu mon problème en utilisant :
somme = Application.WorksheetFunction.Sum(Range(Cells(93, 3), Cells((ligne - 1), 3)))
Mais ça ne m'interresse pas car ça n'affiche pas la formule dans ma feuille de calcul...
Merci pour votre aide !!! :-)
est ce que quelqu'un pourrait m'expliquer pourquoi ceci ne marche pas ? et éventuellement comment résoudre le problème ??
ligne = Sheets("SITE PREPARATION").Range("total").Row
Set plage = Sheets("SITE PREPARATION").Range(Cells(93, 3), Cells((ligne - 1), 3))
Sheets("SITE PREPARATION").Range("eq_quantity").FormulaR1C1 = "=SUM(" & plage & ")"
J'ai plus au moins résolu mon problème en utilisant :
somme = Application.WorksheetFunction.Sum(Range(Cells(93, 3), Cells((ligne - 1), 3)))
Mais ça ne m'interresse pas car ça n'affiche pas la formule dans ma feuille de calcul...
Merci pour votre aide !!! :-)
Configuration: Windows XP Internet Explorer 7.0
2 réponses
-
bonjour,
on peut expliquer....
ligne = Sheets("SITE PREPARATION").Range("total").Row
Set plage = Sheets("SITE PREPARATION").Range(Cells(93, 3), Cells((ligne - 1), 3))
Sheets("SITE PREPARATION").Range("eq_quantity").FormulaR1C1 = "=SUM(" & plage & ")"
en ligne 2... tu définis un objet car Set définit un objet.
en ligne 3 tu utilises ce qui devrait être un nom de plage ( ensemble de cellule) mais que tu as définis comme un objet.
la correction c'est ce qui suit....
ligne = Sheets("Feuil1").Range("total").Row
Sheets("feuil1").Range(Cells(93, 3), Cells((ligne - 1), 3)).Name = "plage"
Sheets("feuil1").Range("eq_quantity").FormulaR1C1 = "=SUM(plage)"
Bonne journée -
