Supprimer ligne selon contenue de 2 cellules
lo
-
NicoDisso Messages postés 231 Statut Membre -
NicoDisso Messages postés 231 Statut Membre -
Bonjour,
Je cherche a supprimer une ligne si celle ci contient dans sa pramière cellule un espace vide et si dans sa troisième cellule le numéros 10 je débute et j'ai essayer avec ce code:
For i = Cells(1, 1).CurrentRegion.Rows.Count To 1 Step -1
If Cells(i, 1).Value = " " And Cells(i, 3).Value = 10 Then Cells(i, 1).EntireRow.Delete and Cells(i,3).EntireRow.Delete
Next
End Sub
Mais bien sur sa ne marche pas alors si quelqu'un pouvais me donner un coup de main se serait sympas
Je cherche a supprimer une ligne si celle ci contient dans sa pramière cellule un espace vide et si dans sa troisième cellule le numéros 10 je débute et j'ai essayer avec ce code:
For i = Cells(1, 1).CurrentRegion.Rows.Count To 1 Step -1
If Cells(i, 1).Value = " " And Cells(i, 3).Value = 10 Then Cells(i, 1).EntireRow.Delete and Cells(i,3).EntireRow.Delete
Next
End Sub
Mais bien sur sa ne marche pas alors si quelqu'un pouvais me donner un coup de main se serait sympas
A voir également:
- Supprimer ligne selon contenue de 2 cellules
- Supprimer rond bleu whatsapp - Guide
- Partage de photos en ligne - Guide
- Impossible de supprimer une page word - Guide
- Formulaire en ligne de meta - Guide
- Impossible de supprimer un fichier - Guide
4 réponses
essayes ca...
For i = Cells(1, 1).CurrentRegion.Rows.Count To 1 Step -1
If Cells(i, 1).Value = " " And Cells(i, 3).Value = 10 Then
Cells(i, 1).EntireRow.Delete
End If
Next i
For i = Cells(1, 1).CurrentRegion.Rows.Count To 1 Step -1
If Cells(i, 1).Value = " " And Cells(i, 3).Value = 10 Then
Cells(i, 1).EntireRow.Delete
End If
Next i
Merci pour ta réponse mais j'ai éssayé ton code et quand je veux exécuter la macro rien ne se passe je sais pas si c le code ou si c moi qui ne ssait pas utiliser visual basic
