C
Cédric
Guest
Bonjour à tous,
J'ai un petit souci avec VBA et Excel
J'ai un tableau dont je voudrais supprimer les lignes automatiquement lorsqu'il y a la mention "VRAI" dans la colonne K.
J'ai tapé le code suivant mais ça ne marche pas
Sub suppr()
i = 1
While Sheets("support BT").Cells(i, 2) <> ""
If Sheets("support BT").Cells(i, 11) = "VRAI" Then
Sheets("support BT").Rows(i).Select
Selection.Delete Shift:=xlUp
End If
i = i + 1
Wend
End Sub
Merci d'avance pour vos réponse
J'ai un petit souci avec VBA et Excel
J'ai un tableau dont je voudrais supprimer les lignes automatiquement lorsqu'il y a la mention "VRAI" dans la colonne K.
J'ai tapé le code suivant mais ça ne marche pas
Sub suppr()
i = 1
While Sheets("support BT").Cells(i, 2) <> ""
If Sheets("support BT").Cells(i, 11) = "VRAI" Then
Sheets("support BT").Rows(i).Select
Selection.Delete Shift:=xlUp
End If
i = i + 1
Wend
End Sub
Merci d'avance pour vos réponse