Excel VBA, somme d'élements d'une matrice

Argile92 Messages postés 10 Statut Membre -  
 Chricky_80 -
Bonjour,

J'ai un problème, qui est je pence, très simple à résoudre pour les personnes connaissant la commande à effectuer.

Alors voilà, j'ai codé dans une macro une matrice de la forme suivante "matrice(1 to 10, 1 to 5)" et j'aimerai faire la somme des éléments suivant "matrice(1 to 10, 1)" soit les 10 éléments se trouvant dans "le 1er tableau".

Existe-t-il une commande autre que
WorksheetFunction.Sum(matrice(1,1), matrice(2,1) ... etc... )
??

Merci de votre aide
Configuration: Windows XP
Internet Explorer 6.0

1 réponse

  1. Chricky_80
     
    Je ne sais pas si ca répond à ta question mais essayes :

    Sub test()

    LigneDépart = 1 'Ligne de ta cellule de départ
    ColonneDépart = 2 'Colonne de ta cellule de départ

    For Ligne = LigneDépart To LigneDépart + 10 'Boucle de 10 occurances
    For Colonne = ColonneDépart To ColonneDépart + 5 'Boucle de 5 occurances
    Somme = Cells(Ligne, Colonne) + Somme ' Ancienne somme + nouvelle cellule
    Next
    Next

    'pour visualiser ton résultat
    mess = "Somme est égale à " & Somme
    MsgBox (mess)

    End Sub

    A+
    Chricky_80
    0