re tout le monde
Une autre solution, créer le commentaire des qu'une formule est saisie.
code a placer dans le module de la feuille concernée :
Citation:
PrivateSub Worksheet_Change(ByVal Target As Range)
* * * * If Target.HasFormula Then
* * * * * * * * With Target
* * * * * * * * * * * * IfNot .Comment IsNothingThen .Comment.Delete
* * * * * * * * * * * * .AddComment
* * * * * * * * * * * * .Comment.Text Text:=Target.FormulaLocal
* * * * * * * * * * * * .Comment.Visible = False
* * * * * * * * End With
* * * * End If
End Sub
|
salut