Bonjour tout le monde !
$J'ai un petit probléme : pas moyen de reussir a faire fonctionner cette partie de programme
je voudrais faire la somme sur chaque ligne mais ca ne veut pas marcher
voici :
For i = 0 To 2
' Récupération du nombre de lignes à comptabiliser dans la formule
MonNoDeLigne = i
MsgBox [=SUM(b" & MonNoDeLigne & ":af" & MonNoDeLigne & ")]
Next
Si vous pouviez m'aider ca serait vraiment cool
Merci d'anvance
For i = 0 To 2
' Récupération du nombre de lignes à comptabiliser dans la formule
MonNoDeLigne = i
For c = 1 To 32
s = ActiveSheet.Cells(i + 1, c).Value + s
Next
Next
MsgBox s
End Sub