Bonjour tout le monde,
Au fait j'ai un tableau qui se présente comme suit:
agence Janv-10 Fev-10 Mar-10 avr-10.....
A 12 15 18 20
B 22 12 52 25
..
..
..

Ma macro doit comparer à chaque fois la date d'aoujourd'hui avec la date du tableau

si la date d'ajourd'hui est superieur à la date du tableau il prend le cumul jusqu'au mois d'avant mon mois

ex: si on est en avril ; il me calcule le cumul JANV+FEV+MARS
si on est en juillet; il me calcule JANV+FEV+MARS+AVRIL+MAI+JUIN

et ainsi de suite

J'ai essayé la macro suivante mais ça n'a pas marché.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Sub cumul()
Dim ligne As Integer, colonne As Integer
For ligne = 14 To 27
  For colonne = 3 To 14
    If Cells(12, colonne) < Cells(1, 5) Then
      Cells(ligne,colonne).formula="sum(cells(ligne,colonne))"
    End If
  Next colonne
Next ligne
End Sub

avec cell(1,5) c'est une case ou j'ai du inserer la date d'aujourd'hui dans ma feuille excel.


Merci de bien vouloir m'aider