VBA - Somme de valeurs en fonction des années et saisons

Bonjour à tous,

Je débute sur VBA et je dois réaliser de nombreux calculs dont la méthode à utiliser m'échappe.

Je cherche cherche à calculer la somme de nombreuses valeurs en fonction de l'année et dans certains cas de la saison.

Je vous joins un classeur avec un extrait de ce que je cherche à faire (calculer le CumulAnnuel) et les données disponibles. D'après mon encadrant, c'est censé être un calcul facil ... Il faut croire que la facilité ne me réussi pas

Comment je doit procéder?

Je sais que cela fait partie des bases, mais je ne sais pas encore comment faire pour sommer les colonnes d'un tableau en intérant des conditions.

Merci d'avance.

Re(bonjour),

Personne n'a d'idée sur la procedure?

J'ai la double boucle ci-dessous. Est-ce que ça pourrait marcher (ça dépend aussi de comment je défini mes variables je suppose). Et j'ai un message d'erreur m'indiquant que l'indice n'appartient pas à la selection (PluieObs(j))...

Dim CumulAnnuel(1 To 9, 1 To 21) As Double
Dim PluieObs() As Double
Dim DateObs As Date
Dim NbAnn As Integer, NPluvio As Integer
Dim i As Integer, j As Integer, m As Integer

ReDim PluieObs(1 To NPluvio, 1 To Nval)

    For i = 1 To NPluvio
        For j = 1 To NbAnn
            Do
                CumulAnnuel(j, i) = 0
                CumulAnnuel(j, i) = CumulAnnuel(i, j) + PluieObs(j)
            Loop Until Year(DateObs) <> Ann1 + a - 1
        Next j
    Next i

Merci d'avance.

Bonne journée !

Bonjour glamcerise,

Voici une solution avec 2 tableaux :

  • 1 tableau intermédiaire pour accélérer le traitement (Tablo).
  • 1 tableau de résultats (Result)
Note :

j'ai supprimé la plupart des données pour alléger le fichier.

A toi de refaire le plein.

38exemple.zip (83.23 Ko)

A+

Merci, je vais essayer d'appliquer ton exemple

Bon week-end !

Rechercher des sujets similaires à "vba somme valeurs fonction annees saisons"