Bonjour,

Pour supprimer certaines lignes dans un grand tableau, j'ai pondu cette macro :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Sub SupprimerI()

Windows("tab_factures_avec_petitavoir.xlsx").Activate
Sheets("Feuil2").Activate
Application.ScreenUpdating = False
Dim k As Integer
For k = 1 To 5000
    If Range("F:" & k).Value = "I" And Range("E:" & k).Value <> Range("E:" & k + 1).Value Then
    Rows("k:k").Delete Shift:=xlUp
    End If
Next k

End Sub
La macro est censée supprimer les lignes qui contiennent "I" dans la colonne F seulement si la ligne du dessous ne concerne pas la même commande (la colonne E contient les numéros de commandes et n'est constituée que de nombres)

Seulement, à l'exécution de la macro, j'ai une erreur de la méthoede Range dans l'objet _Global, avec la ligne en gras surlignée.

J'ai tenté en supprimant des "Value", en mettant "Text" et "Content" à la place, etc, toujours le même bug.

Quelqu'un a une idée ?

Merci d'avance.