Supprimer ligne
Résolu
Bonjour,
j'ai un tableau avec une colonne total
je souhaiterai avec du vba et un bouton supprimer les lignes ou cette colonne est a zéro
quel est le bon code pour ça en sachant que la colonne est la "B"
et que les lignes vont de "8" à "43"
merci d'avance pour l'aide
j'ai un tableau avec une colonne total
je souhaiterai avec du vba et un bouton supprimer les lignes ou cette colonne est a zéro
quel est le bon code pour ça en sachant que la colonne est la "B"
et que les lignes vont de "8" à "43"
merci d'avance pour l'aide
3 réponses
-
Bonjour
Peut-tu essayer avec cette Macro?Sub Macro1()
For i = 43 To 8 Step -1
If ((ThisWorkbook.ActiveSheet.Range("B" & i).Value) = 0) Then
ThisWorkbook.ActiveSheet.Range("B" & i).EntireRow.Delete
End If
Next
End Sub
Bien sur a adapter suivant ton tableau :) -
Bonjour,
Tu peux utiliser une simple boucleSub SupprimerLignes()
Dim Ligne As Integer
For Ligne = 43 To 8 Step -1
If Range("B" & Ligne).Value = 0 Then Rows(Ligne).Delete
Next Ligne
End Sub
A+-
-
@diablo13800Pourtant, sur le fond ton code est préférable au mien car il désigne explicitement les objets classeur et feuille.
Mon code adaptéSub SupprimerLignes()
Dim Ligne As Integer
With ThisWorkbook.Worksheets("Feuil1")
For Ligne = 43 To 8 Step -1
If .Range("B" & Ligne).Value = 0 Then .Rows(Ligne).Delete
Next Ligne
End With
End Sub
A+ -
@GyrusCe qui est bien c'est qu'on ne sait toujours pas si la personne qu'on essai d'aider est satisfaite:)
-
-
Bonjour
la personne est surprise de la rapidité de réponse....
c'est impressionnant
je n'ai qu'à dire un grand bravo et un encore plus grand merci cela fonctionne du feu de dieu
merci merci merci
