bonjour
j'ai un petit soucis avec ce code
je reçois ce message application defined or object defined error
le code a été écrit il y a deux ans et fonction bien jusque là.
il est sensé mettre la valeur pwo(0) ou pw(1) dans Ji en fonction de Gi
pouvez vs m'aider je suis débutant en vba
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Dim PWO(2)
With Params
    PWO(0) = .Range("T39").Value
    PWO(1) = .Range("U39").Value
End With
i=2
While Sheets("Arepartir").Range("A" & i).Text <> ""
    With Sheets("Arepartir")
    .Range("J" & i).Formula = "=IF(G" & i & ">0," & PWO(0) & "," & PWO(1) & ")"
    i=i+1
   End with