VBA excel pb fonction sum
Résolu/Fermé
ori05
Messages postés
56
Date d'inscription
lundi 13 juillet 2009
Statut
Membre
Dernière intervention
7 septembre 2009
-
27 août 2009 à 15:50
ori05 Messages postés 56 Date d'inscription lundi 13 juillet 2009 Statut Membre Dernière intervention 7 septembre 2009 - 27 août 2009 à 16:26
ori05 Messages postés 56 Date d'inscription lundi 13 juillet 2009 Statut Membre Dernière intervention 7 septembre 2009 - 27 août 2009 à 16:26
A voir également:
- VBA excel pb fonction sum
- Liste déroulante excel - Guide
- Excel fonction si et - Guide
- Formule excel - Guide
- Fonction somme excel - Guide
- Fonction moyenne excel - Guide
2 réponses
Bidouilleu_R
Messages postés
1181
Date d'inscription
mardi 27 mai 2008
Statut
Membre
Dernière intervention
12 juillet 2012
288
27 août 2009 à 16:03
27 août 2009 à 16:03
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
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
ori05
Messages postés
56
Date d'inscription
lundi 13 juillet 2009
Statut
Membre
Dernière intervention
7 septembre 2009
3
27 août 2009 à 16:26
27 août 2009 à 16:26
Merci beaucoup !!
Bonne après midi :-)
Bonne après midi :-)
