Fonction somme VBA Fermé

Question

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.

Doudou95 · Answer

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/

NINO · Answer

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.

NINO · Answer

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)"

Fonction somme VBA

3 réponses

Discussions similaires