Fonction somme VBA
NINO
-
Doudou95 Messages postés 1897 Statut Membre -
Doudou95 Messages postés 1897 Statut Membre -
Bonjour,
Je suis nouveau sur le forum et en VBA Excel. Je souhaiterais à la suite d'un code définir dans une cellule la somme d'une colonne qui sera déterminé à partir de données qui pourront varier.
Voici le début de mon code:
Dim C
Dim F
Dim Po
Dim rt
Dim n
C = Range("b1").Value
F = Range("b2").Value2
Po = Range("b3").Value
rt = Range("b4").Value
n = Range("b5").Value
Range("a8").Select
Do While ActiveCell <> ""
ActiveCell.Offset(0, 1).Value = C * Po
ActiveCell.Offset(0, 2).Value = 1 / (1 + rt) ^ ActiveCell.Value
ActiveCell.Offset(0, 3).Value = ActiveCell.Offset(0, 1).Value * ActiveCell.Offset(0, 2).Value
ActiveCell.Offset(1, 0).Select
Loop
Activecell.Offset(0,3).Value= (là je souhaiterais faire la somme de l'ensemble des cellules du dessus)
J'espère avoir été assez clair merci pour votre aide.
Je suis nouveau sur le forum et en VBA Excel. Je souhaiterais à la suite d'un code définir dans une cellule la somme d'une colonne qui sera déterminé à partir de données qui pourront varier.
Voici le début de mon code:
Dim C
Dim F
Dim Po
Dim rt
Dim n
C = Range("b1").Value
F = Range("b2").Value2
Po = Range("b3").Value
rt = Range("b4").Value
n = Range("b5").Value
Range("a8").Select
Do While ActiveCell <> ""
ActiveCell.Offset(0, 1).Value = C * Po
ActiveCell.Offset(0, 2).Value = 1 / (1 + rt) ^ ActiveCell.Value
ActiveCell.Offset(0, 3).Value = ActiveCell.Offset(0, 1).Value * ActiveCell.Offset(0, 2).Value
ActiveCell.Offset(1, 0).Select
Loop
Activecell.Offset(0,3).Value= (là je souhaiterais faire la somme de l'ensemble des cellules du dessus)
J'espère avoir été assez clair merci pour votre aide.
A voir également:
- Fonction somme VBA
- Fonction si et - Guide
- Fonction somme excel - Guide
- Somme si couleur - Guide
- Somme en anglais excel - Guide
- Fonction miroir - Guide
3 réponses
même réponse que pour le sujet qui te précède, pas besoin de vba utilise les formules Excel :
http://www.ybet.be/formation_excell/
http://www.ybet.be/formation_excell/
NINO
Je sais faire une fonction somme sur excel la question posée est comment la faire avec VBA a la suite du programme
D8: 5,714
D9: 5,442
D10: 91,567
A partir du programme la cellule se place en D11 et je voudrais à partir de VBA mettre en D11 la somme D8 + D9 + D10.
D9: 5,442
D10: 91,567
A partir du programme la cellule se place en D11 et je voudrais à partir de VBA mettre en D11 la somme D8 + D9 + D10.
Merci mais les cellules D8, D9 et D10 sont données en exemple le code me place sur une cellule (exemple cellule D11) et là je souhaite faire la somme de toutes les cellules du hauts.
j'avais vu quelque chose comme ca qui correspond à peut prêt à ce que je voudrais faire mais ca ne fonctionne pas
range("d11").formula= "=Sum(R[-" & maxrow & "]C:R[-1]C)"
j'avais vu quelque chose comme ca qui correspond à peut prêt à ce que je voudrais faire mais ca ne fonctionne pas
range("d11").formula= "=Sum(R[-" & maxrow & "]C:R[-1]C)"
