If Worksheets("Feuil2").Cells(i, 1).Value = "J30" Then
Worksheets("Feuil1").Cells(6, 2).Value = Worksheets("Feuil2").Cells(i, 2).Value
Exit Do
Else
Do While i <= 650
If Worksheets("Feuil2").Cells(i, 1).Value = "J30" Then
Worksheets("Feuil1").Cells(6, 2).Value = Worksheets("Feuil2").Cells(i, 2).Value
i = i + 1
Else
Pourriez-vous me corriger ce qui est faux svp ? Sans changer les codes déjà présents car je dois respecter le VBA (donc pas de recherchev) et utiliser uniquement des "If" et des "Do While"
Re,
si le test est vérifié, ca ne passe pas dans le "else" donc tu n'as pas ton i + 1... donc ton code boucle...
Pourquoi cette question ? A cause des conditions ?
Et comme je souhaite comprendre ce que j'écris, je préfère que ça soit plus long quitte à alourdir le programme, plutôt que de recopier