Supprimer ligne si colonne A et B = 0

Bonjour,

Dans une feuille j'ai une liste de numéros clients que je veux filtrer à l'aide d'une macro.

Si en ligne 1, la colonne A=0 et la colonne B=0 alors supprimer ligne 1 etc pour toutes les lignes car le nombre de numéros clients varient d'une feuille à l'autre.

Merci beaucoup.

23book1.xlsx (65.35 Ko)

bonjour,

je suppose que tu voulais dire b=0 et c=0, voici une macro qui supprime les lignes qui ont B=C=0

Sub supprimeligne()
    Application.ScreenUpdating = False
    With Worksheets("sales dvlpt")
        dls = .Range("A" & Rows.Count).End(xlUp).Row
        For i = dls To 2 Step -1
            If .Cells(i, 2) = 0 And .Cells(i, 3) = 0 Then 'col B et col C = 0
                .Rows(i).Delete shift:=xlUp
            End If
        Next i
    End With
    Application.ScreenUpdating = True
End Sub

Bonjour et merci pour ta proposition.

Effectivement il s'agit des colonnes b et c.

J'ai intégré ton code et je me suis rendu compte que j'avais fait une erreur.

En fait je veux conserver uniquement les lignes pour lesquelles la b=c>=0, j'espère que la formulation est correcte.

Donc dans ton code j'ai remplace And par Or, mais il me restait toujours les données inférieures à 0 dans j'ai ajouté <= 0.

Le seul problème qui reste c'est que la ligne 1 n'est pas prise en compte dans la macro et je ne trouve pas où changer ça dans le code... du coup je colle mes données en A2 mais ce n'est pas très propre.

En tout cas, merci beaucoup pour ton aide et bon weekend.

Lepeno a écrit :

Le seul problème qui reste c'est que la ligne 1 n'est pas prise en compte dans la macro et je ne trouve pas où changer ça dans le code... du coup je colle mes données en A2 mais ce n'est pas très propre.

je ne sais pas pourquoi, mais je pensais qu'il y avait une ligne de titre !

change le 2 en 1 dans l'instruction

for i=dls to 2 step-1

Cool merci

Rechercher des sujets similaires à "supprimer ligne colonne"