Bonjour
pour faire un calcul dans une feuil en vba,j'ai crée un code sur (worksheetfunction),le code suivant:
******************************
Private Sub Worksheet_Change(ByVal Target As Range)
Dim lg As Long
lg = Cells(Rows.Count, "C").End(xlUp).Row
If Not Intersect(Target, Range("F2:F"...