MErci pr la formule de conversion des formules mais il me reste encore un problemes, comment puis je faire pour lui dire que si c'est une formule du genre =Somme) de ne pas la modifier? Tout en continuant de modifier les cellules contentant les formules du genre =250000+25
Sub hj()
For Each cl In Selection
If InStr(1, cl.Formula, "SUM") > 0 Then
MsgBox ("modif de " & cl.Address(0, 0))
'modif
Else
'nomodif
MsgBox ("no modif de " & cl.Address(0, 0))
End If
Next cl
End Sub