Bonjour à tous,

Apres avoir longtemps cherché sur le forum, je n'ai malheureusement pas trouvé mon Bonheur, voila mon soucis:


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Dim pSB0 As Integer
Dim dSB0 As Integer
Dim Range1 As Range
 
For i = 5 To 1700
    If Cells(i, 36) = Cells(43, 34) Then
    pSB0 = Cells(i, 36).Row
    ElseIf Cells(i, 36) = Cells(47, 34) Then
    dSB0 = Cells(i, 36).Row
    End If
Next
Cells(45, 57) = Application.WorksheetFunction.Average(Range(Cells(pSB0, 53), Cells(dSB0, 53)))

Mon code VBA consiste, à partir d'un tableau de valeurs, d'effectuer une moyenne sur une plage de valeurs determine grâce à un numéro de ligne.
Le problem est que ce code me renvoie l'erreur 1004 sur la derniere ligne de mon code. Est-ce à cause des variables pSB0 et dSB0 ?

Merci d'avance pour l'aide apportée