Fonction somme VBA
NINO
-
Doudou95 Messages postés 1897 Date d'inscription Statut Membre Dernière intervention -
Doudou95 Messages postés 1897 Date d'inscription Statut Membre Dernière intervention -
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.
Configuration: Windows XP Internet Explorer 6.0
A voir également:
- Fonction somme VBA
- Fonction si ou - Guide
- Excel somme colonne - Guide
- Somme en anglais excel - Guide
- Somme si couleur - Guide
- Fonction trier excel - 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
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)"