j'ai utilisé ce code pour insérer une ligne sous une condition en utilisant ce code:
f = 2
While f < p
If (Cells(f, 3) - Cells(f, 2)) > 750 Then
h = f
Cells(h, 8).Select
Selection.EntireRow.Insert
End If
f = f + 1
Wend
avec p est le nombre de ligne de ma tableau qui est constitué de 3 colonnes: les deux colonnes, 2 et 3, contiennent des grandes valeurs et donc si j'ai la condition suivante cells(f,3)-cells(f,2)> 750 donc j'insère un ligne et je copie les valeurs de la ligne précedente dans la ligne inserée.
j'ai utilisé ce code pour l'insertion, il insère plusieures lignes successives.
