Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Calcul (somme) avec VBA

Calcul (somme) avec VBA

3 réponses
Avatar
Michel
Bonjour,

J'ai une feuille de calcul avec diverses infos et j'aimerai que dans la
cellule J1 j'aie la somme des cellules H1 à H11, que en J12 j'aie la somme
des cellules H12 à H22, que en J23 j'ai la somme des cellules H23 à H33,
etc... jusqu'Ã ce qu'il ne trouve plus d'infos dans la colonne H.

Merci pour votre aide
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Pierre Fauconnier
Bonjour

Sub SommeJ()
Dim Cellule As Range
Dim Flag_Donnees As Boolean

Set Cellule = Range("j1")
If Cellule(1, -1) <> "" Then Cellule.FormulaLocal = _
"=somme(h" & Cellule.Row & ":h" & Cellule.Row + 10 & ")"
If Cellule(11, -1) <> "" Then Flag_Donnees = True
Do While Flag_Donnees
Set Cellule = Cellule(12, 1)
Cellule.FormulaLocal = _
"=somme(h" & Cellule.Row & ":h" & Cellule.Row + 10 & ")"
If Cellule(11, -1) = "" Then Flag_Donnees = False
Loop
End Sub

Cela convient-il?


--
Pierre Fauconnier ()
Les sept laids tuent ( Lewis Carol )
Remplacez nospam.nospam par pfi.be pour répondre. Merci

"Michel" a écrit dans le message de
news:
Bonjour,

J'ai une feuille de calcul avec diverses infos et j'aimerai que dans la
cellule J1 j'aie la somme des cellules H1 à H11, que en J12 j'aie la
somme

des cellules H12 à H22, que en J23 j'ai la somme des cellules H23 à H33,
etc... jusqu'Ã ce qu'il ne trouve plus d'infos dans la colonne H.

Merci pour votre aide



Avatar
Pierre Fauconnier
J'ai considéré pour la macro qu'il n'y avait pas de blancs dans les valeurs.
S'il y a des blancs, il faudra adapter un petit peu...

Pierre

"Michel" a écrit dans le message de
news:
Bonjour,

J'ai une feuille de calcul avec diverses infos et j'aimerai que dans la
cellule J1 j'aie la somme des cellules H1 à H11, que en J12 j'aie la
somme

des cellules H12 à H22, que en J23 j'ai la somme des cellules H23 à H33,
etc... jusqu'Ã ce qu'il ne trouve plus d'infos dans la colonne H.

Merci pour votre aide



Avatar
isabelle
bonjour Michel,

=SOMME(INDIRECT(ADRESSE(LIGNE();COLONNE()-2)&":"&ADRESSE(LIGNE()+10;COLONNE()-2)))

isabelle


Bonjour,

J'ai une feuille de calcul avec diverses infos et j'aimerai que dans la
cellule J1 j'aie la somme des cellules H1 Ã H11, que en J12 j'aie la somme
des cellules H12 Ã H22, que en J23 j'ai la somme des cellules H23 Ã H33,
etc... jusqu'Ã ce qu'il ne trouve plus d'infos dans la colonne H.

Merci pour votre aide