Bonjour à tous,

Je rencontre un problème avec mon code me permettant de lire dans un tableau.
En fait, je dois parcours la première colonne du tableau et la première ligne du tableau et renvoyer l'intersection entre la colonne et la ligne.

Merci pour votre aide

Voila mon code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Function nb_points(data, day As Range, week As Range)
 
 
    For i = 0 To UBound(data, 1)
        For j = 0 To UBound(data, 2)
 
        If data(i, 1) = day & data(1, j) = week Then
          nb_points = data(i, j).Value
        End If
 
        Next j
    Next i
 
End Function
et voila mon tableau avec les 2 données variables en dessous

Nom : pts.gif
Affichages : 118
Taille : 14,8 Ko

Nom : pts2.gif
Affichages : 112
Taille : 4,1 Ko