VBA Boucle et Addition

Résolu
SleepyAshes Messages postés 34 Date d'inscription   Statut Membre Dernière intervention   -  
SleepyAshes Messages postés 34 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à vous :)

Voilà, je suis un débutant en programmation et j'ai besoin de vos lumières.
Je me retrouve face à un tableau avec 890 lignes et 20 colonnes. La colonne qui m'interesse est la colonne I La première lignes contient le titre de la colonne et le reste des lignes contiennent des nombres. Je dois faire la somme des 889 lignes en utilisant obligatoirement une boucle dans ma macro. Pouvez vous m'aidez? Merci :)

Voici ma boucle qui fait planter excel:

Sub VAddition()
Dim Nblignes As Double
Dim i
Dim j
Nblignes = Cells(Rows.Count, "A").End(xlUp).Row
j = Cells(2, 9).Value
For i = 1 To Nblignes
i = j + 1
Next i
MsgBox i
End Sub

1 réponse

ThauTheme Messages postés 1442 Date d'inscription   Statut Membre Dernière intervention   160
 
Bonjour SleepyAshes, bonjour le forum,

Essaie comme ça :
Dim S As Double 'déclare la variable S (Somme)
Dim I as Integer 'déclare la variable I (Incrément)

For I = 2 To 889 'boucle des lignes 2 à 889
     S = S + Cells(I, 9).Value 'définit la somme S en ajoutant la cellule ligne I colonne 9 (=colonne I)
Next I 'prochaine ligne de la boucle
MsgBox S 'affiche la somme s dans un message



À plus,
ThauTheme
0
SleepyAshes Messages postés 34 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour et merci infiniment du temps que vous avez pris pour m'aider!! Je vous souhaite une bonne journée et encore merci :)
0