Bonjour,

Est ce qu'une personne du forum pourrait m'indiquer ou se trouve le problème ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
For K = 0 To UBound(TRatJour())
Cells(12, K + 2).Formula = "=" & Cells(10, K + 2).Address & "/" & TRatJour(K)
Next K
Merci par avance