[VBA/Excel]

Fermé
Gilou - 9 févr. 2011 à 17:28
 Gilou - 9 févr. 2011 à 21:46
Bonjour,


Comment peut-on traduire dans VBA la formule excel "=Somme(D3:D106)", c'est à dire la formule pour additionner les valeurs des cases D3 à D106 ?

Merci
Gilou
A voir également:

4 réponses

Bonjour,

Option Explicit

Sub SommePlage()

    Dim Plage As Range, Cible As Range
    Dim Resul As Double
    
    Set Plage = Range("D3:D106")
    
    For Each Cible In Plage
        Resul = Resul + CDbl(Cible.Value)
    Next Cible
    
    MsgBox Resul
    
End Sub


Info
1
melanie1324 Messages postés 1505 Date d'inscription vendredi 25 mai 2007 Statut Membre Dernière intervention 31 janvier 2018 154
9 févr. 2011 à 17:30
bonjour,

tu fais outils, macro, enregistrer une nouvelle macro.
dans ta cellule, tu mets "=somme(d3:D106)".
Tu arrêtes l'enregistrement.
Tu vas dans outils macro, vba, et le module 1 contient ta formule en vba
0
Merci

Mais sans passer par la macro et une cellule particulière de la feuille, il n'y a pas un moyen de calculer une somme de cellules ?

Je veux dire, je peux faire une ligne indiquant que la variable V

V = Range("B3")+...+Range("B106")

On ne peut pas indiquer plus simplement cette ligne ?
0
Merci
Ca marche
0