en fait si je comprend bien..
voici les données du songbook :
Private Sub Workbook_Open()
Range("A1").FormulaR1C1 = "=MID(R[10]C[1],3,20)"
Range("A1") = Range("A1").Value
Range("B11") = "DV0" & 0 & Range("A1").Value + 1
Range("A1").ClearContents
End Sub
je tape donc dans la cellule A1 "=MID(R[10]C[1],3,20)" sans les guillements.. c'est bien cela ??
j'ai un peu de mal sur ce coup là.. Dslé... je ne connais pas aussi bien excel que toi ;o)