Bonjour,
je dispose d'un fichier de plusieurs décisions déroulées chacune sur une ligne Excel.
Je dois compter le nombre de décisions qui ont été prises entre deux Dates. Jusque là pas de problèmes (Voir le code, cela fonctionne bien)
Mais cela se complique car je dois aussi compter le nombre de décision par mois entre les deux dates. Et là je ne vois pas comment faire.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24 Sub requete() Dim i As Integer, a As Integer Dim f As Worksheet, g As Worksheet Dim d1 As Date, d2 As Date, d3 As Date Set f = ThisWorkbook.Worksheets("AGO") Set g = ThisWorkbook.Worksheets("EC_sur_1_an") d1 = g.Cells(2, 4).Value d2 = g.Cells(2, 6).Value MsgBox "D1 = " & d1 & " et D2 = " & d2 d3 = Month(d1) MsgBox "D3 = " & d3 a = 0 For i = 6 To 1000 ''''''''' Total If d1 <= f.Cells(i, 3).Value And f.Cells(i, 3).Value <= d2 Then a = a + 1 End If Next i g.Cells(5, 1).Value = a g.Activate End Sub
Si quelqu'un pouvait m'aider.
Merci
Partager