Faire somme avec 2 boucles FOR
Résolu/Fermé
Steeve999
Messages postés
16
Date d'inscription
lundi 17 juillet 2017
Statut
Membre
Dernière intervention
24 avril 2018
-
19 mars 2018 à 12:41
Steeve999 Messages postés 16 Date d'inscription lundi 17 juillet 2017 Statut Membre Dernière intervention 24 avril 2018 - 26 mars 2018 à 14:05
Steeve999 Messages postés 16 Date d'inscription lundi 17 juillet 2017 Statut Membre Dernière intervention 24 avril 2018 - 26 mars 2018 à 14:05
A voir également:
- Faire somme avec 2 boucles FOR
- Somme si couleur - Guide
- Jdownloader 2 - Télécharger - Téléchargement & Transfert
- Somme excel - Guide
- 2 comptes whatsapp - Guide
- Download instagram for pc - Télécharger - Divers Communication
1 réponse
ccm81
Messages postés
10543
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
18 mars 2023
2 336
Modifié le 19 mars 2018 à 15:15
Modifié le 19 mars 2018 à 15:15
Bonjour
On peut faire simple (1 seule boucle sur les lignes)
Cdlmnt
On peut faire simple (1 seule boucle sur les lignes)
Sub total()
Dim li, DerLig As Long
Dim plage As Range, tot
DerLig = Range("E2").End(xlDown).Row
For li = 60 To DerLig - 59 Step 60
Set plage = Range("B" & li - 59 & ":" & "B" & li)
tot = Application.WorksheetFunction.Sum(plage)
Range("C" & li).Value = tot
Next li
End Sub
Cdlmnt
26 mars 2018 à 14:05