Microsoft 365 formulalocal

[Claudy]

Bonjour,
comment formuler une simple formule de soustraction:

Sub testCath()

l = ActiveCell.Row
'Donc en K10=J10-C10

Range("K" & l).FormulaLocal = "=""J"" & l -""C"" & l"


End Sub

Merci d'avance,
Claudy

 

[Claudy]

Ok, j'ai trouvé:

Sub testCath()
l = ActiveCell.Row

Range("K" & l).FormulaLocal = "=J" & l & "-C" & l

'Donc en K10=J10-C10

End Sub

Claudy