Bjr,
j'applique la méthode à partir d'une sélection :
- si elle comporte plusieurs lignes, pas de pb,
- si ma sélection ne contient qu'une seule ligne, ca plante (ERR 1004: la méthode de la classe Range a échoué)

Dans mon exemple suivant, si NbrIndivi=2 ca plante, si NbrIndivi>2 c'est OK :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Range("W2").Select
    ActiveCell.FormulaR1C1 = "=CONCATENATE(RC[-16],"","",RC[-14])"
    Selection.AutoFill Destination:=Range("W2:W" & NbrIndivi), Type:=xlFillDefault
A priori, y'aurait 1 souci sur la Destination si le Range porte sur 1 seule cellule et non pas une plage? quelle solution pour résoudre mon pb ?

NB : la destination est en fonction de ma selection préalable, qui peut varier d'une à plusieurs lignes, et qui se traduit par 1 cellule ou 1 plage.

Merci d'avance.