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
Configuration: Windows XP Internet Explorer 6.0
A voir également:
- Supprimer ligne selon contenue de 2 cellules
- Supprimer rond bleu whatsapp - Guide
- Partage de photos en ligne - Guide
- Fusionner deux cellules excel en gardant le contenu - Guide
- Impossible de supprimer une page word - Guide
- Comment supprimer une ligne dans un tableau word - 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
