Function LireF(target, Optional notation As Integer)
Select Case notation
Case 2 ' absolue US
'Cette propriété renvoie ou définit la formule de l'objet, en utilisant les références du style A1 dans la langue de la macro.
LireF = "'" & target.Formula
Case 3 ' relative FR L1C1
'Cette propriété renvoie ou définit la formule de l'objet, en utilisant les notations de style R1C1 dans la langue de l'utilisateur.
LireF = "'" & target.FormulaR1C1Local
Case 4 ' relative US R1C1
'Cette propriété renvoie ou définit la formule de l'objet, en utilisant les notations de style R1C1 dans le langage de la macro.
LireF = "'" & target.FormulaR1C1
Case Else
'Cette propriété renvoie ou définit la formule de l'objet, en utilisant les références du style A1 dans le langage de l'utilisateur.
LireF = "'" & target.FormulaLocal
End Select
End Function