G
guyguy
Guest
Bonjour
je suis en train de marracher les cheveux avec un code macro qui fonctionne partiellement.
voila la macro doit meffacer les lignes ou les cellules sont vides , ou si il y a decrit 0N ou 0E et doit donc me garder uniquemen tles ligne sou dans les cellules il y a 1Nou 1E
seulement quand la macro sexecute elle me laisse des lignes avec cellules vides et aussi 0N ou 0E et m'effacent quelque slignes pu il y a 1 N ou 1 E de mentionnés.
c'est un tableau a 5 colonnes - la 1eres avec des noms et les autres des dates et les cellules mentionnent soient rien, soit 1N soit 1E soit 0N ou 0E. un collegue ma dit que cest parce que donc la 1ere colonne e date il ny a que des cellules vides alors c afausse la macro
voice le code apppliqué
Sub need()
'etape 1: Remove blank cells
For Each cellule In Range("C4:G140")
If cellule.Value = "0E" Or cellule.Value = "0N" Or cellule.Value = "" Then
Rows(cellule.Row).Delete
End If
Next
End Sub
je suis en train de marracher les cheveux avec un code macro qui fonctionne partiellement.
voila la macro doit meffacer les lignes ou les cellules sont vides , ou si il y a decrit 0N ou 0E et doit donc me garder uniquemen tles ligne sou dans les cellules il y a 1Nou 1E
seulement quand la macro sexecute elle me laisse des lignes avec cellules vides et aussi 0N ou 0E et m'effacent quelque slignes pu il y a 1 N ou 1 E de mentionnés.
c'est un tableau a 5 colonnes - la 1eres avec des noms et les autres des dates et les cellules mentionnent soient rien, soit 1N soit 1E soit 0N ou 0E. un collegue ma dit que cest parce que donc la 1ere colonne e date il ny a que des cellules vides alors c afausse la macro
voice le code apppliqué
Sub need()
'etape 1: Remove blank cells
For Each cellule In Range("C4:G140")
If cellule.Value = "0E" Or cellule.Value = "0N" Or cellule.Value = "" Then
Rows(cellule.Row).Delete
End If
Next
End Sub