Bonjour, bonjour Dranreb,
Grace à toi j'ai compris comment faire ma macro pour plusieurs lignes !
Sub TEST()
Dim i As Long, j As Long, k As Long, A As Long
A = 1
With Sheets("Feuil2")
For i = 1 To 3 Step 2
.Cells(i, 10).FormulaR1C1 = "=TRIM(RC1)"
For j = 1 To 2
j = A
If .Cells(i, 10) =...