Bonjour,

Je souhaiterai avoir de l'aide pour recherché dans un tableau Excel les nouveau client de la semaine (une colone = une semaine 52 semaines au total) qui sont repérés avec une couleur spécifique et faire le calcul en bas de chaque colone je vous une partie du code qui a été réalisé par personne sur laquelle je me suis basé [mais je ne sait koi mettre dans l'apel de la fontction somme_cel_couleur(Feuil1 , ....)]
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
25
26
27
28
Private Sub somme_Click()
 
    Sum = somme_cel_couleur(Feuil1, bgcol)
 
End Sub
 
Function somme_cel_couleur(SearchArea As Object, Bgcolor As Range) As Double
 
    Dim macoul As Byte, cell As Range
    Dim somme As Double
 
    Application.Volatile
 
    somme = 0
 
    macoul = Bgcolor.Interior.ColorIndex
 
    For Each cell In SearchArea
 
        If cell.Font.ColorIndex = macoul Then
            somme = somme + cell.Value
        End If
 
    Next cell
 
    somme_cel_couleur = somme
 
End Function

Merci d'avance