Formule concaténée à étendre sur une colonne entière

Bonjour

Je souhaiterais appliquer une formule en cellule A2 égale à "F2"&"G2" et ce sur toute la colonne A jusqu'à ce qu'il n'y ait plus de valeur dans la colonne F, et je bloque

Merci par avance pour votre aide !

Je ne suis pas sûre que ça soit possible mais j'ai essayé avec cette formule :

For i = 2 To Rows.Count

Range("A" & i) = "RC[i,5]&RC[i,6]"

Next i

On me dit "Dépassement de capacité"... pour info j'ai 90000 lignes

J'ai trouvé cette formule sinon :

'Range("A1").Activate

'Do While ActiveCell.Offset(0, 5) <> "" 'Loops until the active cell is blank.

'ActiveCell.FormulaR1C1 = "=RC[5]&RC[6]"

'ActiveCell.Offset(1, 0).Select

'Loop

Mais elle met un temps fou...

Bonjour

Une double proposition. Te convient-elle ?

Bye !

Elle est top merci !