VBA Excel effacer sous condition

Bonjour
Je travail sur une plage de cellule.
Je recherche une formule VBA qui permettrait d’effacer les cellules adjacentes à droite si la valeur de la cellule de référence est égale à O.
Sur mon exemple (classeur ci-joint) : Plage de cellule : A1 :C20
Objectif : effacer les cellules B11 :B20 puisque les cellules de droites A11 :A20 sont égales à 0
Merci pour votre retour

Salut,

D'après ta description, je dirais la méthode Offset de l'objet Range.
Cette dernière renvoie une référence vers une plage relative à une plage donnée.

Exemple:

Code:

---

1 2 3 4 5 6

Dim Ws As Excel.Worksheet Set Ws = ThisWorkbook.Worksheets(1)   Dim Rng As Excel.Range Set Rng = Ws.Range("A11") '// Reference sur la cellule A11 Set Rng = Rng.Offset(ColumnOffset:=1) '// Reference sur la cellule décalée d'une colonne vers la droite de la cellule A11, soit B11

---