coucou,

voilà j'aurai voulu savoir si il était possible de simplifier l'écriture de la formule suivante :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
    For i = 2 To nombre + 1
        '(ligne3 - ligne5)/ligne5
        Worksheets(Feuille).Range(Cells(7, i), Cells(7, i)).Value = (Worksheets(Feuille).Range(Cells(3, i), Cells(3, i)).Value - Worksheets(Feuille).Range(Cells(5, i), Cells(5, i)).Value) / Worksheets(Feuille).Range(Cells(5, i), Cells(5, i)).Value
 
    Next
Car apres j'aurai surement d'autre calculs à faire avec plus d'opérations donc le code fera 3km

j'avai dejà essayé de remplacer les " Worksheets(Feuille).Range(Cells(5, i), Cells(5, i)).Value "
mais sans succès