j'ai pas bien compris ta formuleRemarque en R1C1 seules les références relatives se mettent entre crochets droits, pas les références absolues. cette formule fait la même chose :VB:rg.FormulaR1C1 = "=RC[-1]&IF(ISBLANK(R[1]C15),"" ""&R[1]C[-1],"""")"
Sub test()
Dim x&, µ&
x = -1
µ = 0
MsgBox Cells(ActiveCell.Row + x, ActiveCell.Column + µ).Value
End Sub
MsgBox Application.Evaluate(Application.ConvertFormula("=R[" & x & "]C[" & µ & "]", xlR1C1, xlA1)).Value
MsgBox ActiveCell.Offset(x, µ).Value
SltBonjour @SAAD doli
Et si tu nous disait plus simplement ce que tu veux faire.
Exemple je suis dans la cellule untel et veux faire ceci ou cela
@Phil69970
rg.FormulaR1C1 = "=RC[-1]&IF(ISBLANK(R[1]C15),"" ""&R[1]C[-1],"""")"
j'ai pas bien compris ta formuleRemarque en R1C1 seules les références relatives se mettent entre crochets droits, pas les références absolues. cette formule fait la même chose :VB:rg.FormulaR1C1 = "=RC[-1]&IF(ISBLANK(R[1]C15),"" ""&R[1]C[-1],"""")"
=X2&SI(ESTVIDE($O3);" "&X3;"")