Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Somme vba

Somme vba

7 réponses
Avatar
Brat'ac
Bonjour,

L'enregistreur de macro me donne:
ActiveCell.FormulaR1C1 = "=SUM(R[-102]C:R[-4]C)"
pour faire la somme des cellules de 11 a 102 de la colonne R

Comment faire pour remplacer 11 et 102 par des variables ?

Je galère, Merci
Signaler un problème avec ce contenu

7 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
Jacquouille
Bonjour
Range("A1").Select
ActiveCell.FormulaR1C1 = "=SUM(zaza:toto)"
Jacques
" Le vin est au repas ce que le parfum est à la femme."
.
"Brat'ac" a écrit dans le message de groupe de discussion :
Bonjour,
L'enregistreur de macro me donne:
ActiveCell.FormulaR1C1 = "=SUM(R[-102]C:R[-4]C)"
pour faire la somme des cellules de 11 a 102 de la colonne R
Comment faire pour remplacer 11 et 102 par des variables ?
Je galère, Merci
Avatar
Jacquouille
Re
Ce n'est pas tout à fait la bonne réponse.
dans ce cas, il s'agit de la somme d'une plage délimitée par des cellules
nommées Zaza et Toto.
désolé.
Jacques
" Le vin est au repas ce que le parfum est à la femme."
.
"Jacquouille" a écrit dans le message de groupe de discussion :
of4863$30l$
Bonjour
Range("A1").Select
ActiveCell.FormulaR1C1 = "=SUM(zaza:toto)"
Jacques
" Le vin est au repas ce que le parfum est à la femme."
.
"Brat'ac" a écrit dans le message de groupe de discussion :
Bonjour,
L'enregistreur de macro me donne:
ActiveCell.FormulaR1C1 = "=SUM(R[-102]C:R[-4]C)"
pour faire la somme des cellules de 11 a 102 de la colonne R
Comment faire pour remplacer 11 et 102 par des variables ?
Je galère, Merci
Avatar
MichD
Bonjour,
Essaie comme ceci :
'--------------------------------------
Sub test()
'Dans la cellule où tu veux le résultat
'Supposons que c'est dans la cellule A1
'adapte le nom de la feuille.
Worksheets("Feuil1").Range("A1").Formula = "=Sum(R11:R102)"
End Sub
'--------------------------------------
MichD
Avatar
isabelle
bonjour,
pour faire la somme de la plage R11:R102
r1 = 11
r2 = 102
ActiveCell.Formula = "=Sum(R" & r1 & ":R" & r2 & ")"
vous pourriez aussi remplacer ActiveCell par la cellule de votre choix,
par exemple:
Range("R" & r2 +1).Formula = "=Sum(R" & r1 & ":R" & r2 & ")"
isabelle
Le 2017-05-12 à 06:11, Brat'ac a écrit :
Bonjour,
L'enregistreur de macro me donne:
ActiveCell.FormulaR1C1 = "=SUM(R[-102]C:R[-4]C)"
pour faire la somme des cellules de 11 a 102 de la colonne R
Comment faire pour remplacer 11 et 102 par des variables ?
Je galère, Merci
Avatar
Jacquouille
Salut Isabelle
Tu as bien compté les " ?
Il n'en manque pas un devant le premier R ?
Jacques
" Le vin est au repas ce que le parfum est à la femme."
.
"isabelle" a écrit dans le message de groupe de discussion :
of58u2$1q51$
bonjour,
pour faire la somme de la plage R11:R102
r1 = 11
r2 = 102
ActiveCell.Formula = "=Sum(R" & r1 & ":R" & r2 & ")"
vous pourriez aussi remplacer ActiveCell par la cellule de votre choix,
par exemple:
Range("R" & r2 +1).Formula = "=Sum(R" & r1 & ":R" & r2 & ")"
isabelle
Le 2017-05-12 à 06:11, Brat'ac a écrit :
Bonjour,
L'enregistreur de macro me donne:
ActiveCell.FormulaR1C1 = "=SUM(R[-102]C:R[-4]C)"
pour faire la somme des cellules de 11 a 102 de la colonne R
Comment faire pour remplacer 11 et 102 par des variables ?
Je galère, Merci
Avatar
isabelle
meuh.... non,
fait le test ;-)
isabelle
Le 2017-05-12 à 17:56, Jacquouille a écrit :
Salut Isabelle
Tu as bien compté les " ?
Il n'en manque pas un devant le premier R ?
Jacques
" Le vin est au repas ce que le parfum est à la femme."
.
"isabelle" a écrit dans le message de groupe de discussion :
of58u2$1q51$
bonjour,
pour faire la somme de la plage R11:R102
r1 = 11
r2 = 102
ActiveCell.Formula = "=Sum(R" & r1 & ":R" & r2 & ")"
vous pourriez aussi remplacer ActiveCell par la cellule de votre choix,
par exemple:
Range("R" & r2 +1).Formula = "=Sum(R" & r1 & ":R" & r2 & ")"
isabelle
Le 2017-05-12 à 06:11, Brat'ac a écrit :
Bonjour,
L'enregistreur de macro me donne:
ActiveCell.FormulaR1C1 = "=SUM(R[-102]C:R[-4]C)"
pour faire la somme des cellules de 11 a 102 de la colonne R
Comment faire pour remplacer 11 et 102 par des variables ?
Je galère, Merci
Avatar
Brat'ac
Dans son message précédent, isabelle a écrit :
Merci à tous c'est parfait.
Bon Week-End