Boucle pour effacer le contenu de ligne si une cellule est vide

Bonjour,

je suis a la recherche d'un moyen simple pour effacer le contenu de toute une ligne si la valeur une cellule donnnée est effacée.

Principe. Je rentre une valeur en B, à partir de là je lance une serie de petite macro, vlookup,.... pour remplir la colonne C, J, K,...

Mon pb est que si j'efface la valeur en B, les autres cellules de la meme ligne restent remplies.

Je suis donc a la recherche d'un code pour effacer le contenu de toute la ligne si j'efface la valeur de la cellule en B.

Ps: mon tableau a une longeur variable

Merci pour votre aide.

allmo

Bonjour,

Une piste à convertir en VBA : Tu filtres tes cellules vides de ta colonne, tu nettoies tes cellules Range("XX:XX").SpecialCells(xlCellTypeVisible).ClearContents

Par contre ça n'efface que le contenu mais ne supprimes pas la ligne, c'est ce qui était demandé.

Cdlt,

Oui effectivement ,juste nettoyer la ligne pas la supprimer.

Mon niveau est pas bien élevé en VBA, je vais voir si j'arrive a faire une convertion.

Merci pour ton aide

Bonjour,

Un petit test pour te donner un exemple.

Cdlt,

Petite question, pourquoi dans votre exemple la 1er cellule remplie en A est aussi effacée

Bonjour,

Car A1 fait parti de la plage UsedRange et n'est pas filtré car est considéré comme l'en tête du tableau.

Avec une table structurée ListObject on pourrait ne s'intéresser qu'à la DataBodyRange. Tout dépend de la construction de votre fichier et de la plage ciblée.

Un autre test :

Sub NET()
With ActiveSheet
L_R = .Cells(.Rows.Count, 1).End(xlUp).Row
    .UsedRange.AutoFilter Field:=1, Criteria1:=""
    .Range("A2:C" & L_R).SpecialCells(xlCellTypeVisible).ClearContents
    .ShowAllData
End With
End Sub

Cdlt,

ça fonctionne bien sur votre fichier mais pas sur le mien.

J'ai une erreur, "autofilter method of Range class failed" sur la ligne de code

.UsedRange.AutoFilter Field:=1, Criteria1:=""

Bonjour,

Comme expliqué plus haut, tout dépend de la construction de la plage. Si un filtre est déjà appliqué, s'il s'agit d'une table structurée, etc ...

Cdlt,

Merci pour vos informations,

Cdlt,