Bonjour,

je me permets de soliciter votre aide sur un point.

Voici mon code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
Sub calcul()
 
For j = 0 To 240
 
'in
 
Set Plage = Worksheets("Projection").Range("F6:F1006").Offset(0, j - 1)
 
For Each Cell In Plage
 
Set maPlage = Range(Cell, Cell.Offset(0, 4))  etc..
mais il n'accepte pas le range.

Pourriez-vous m'aider à débugger cette partie?

je vous remercie par avance.

TRM