Vider ligne et non supprimer si en colonne a

[CG2000]

Bonsoir le Forum.

Besoin a nouveau de vôtre aide pour :

Dans un tableau j'importe énormément d'info.
Je cherche en vba la posibilité de vider et non supprimer la ligne ou les lignes entièrement qui posèderaient CG2000 en colonne A (voir dans l'exemple ci-joint).
Merci par avance de votre aide.

CG2000

 

[Papou-net]

Re : Vider ligne et non supprimer si en colonne a

Bonsoir CG2000,

Voici un exemple de macro :

Private Sub EffaceLigne()
For Each cel In Range("A1:A" & UsedRange.Rows.Count).Cells
  If cel = "CG2000" Then Cells(cel.Row, 1).EntireRow.ClearContents
Next
End Sub

Bonne soirée.

 

[CG2000]

Resolu : Vider ligne et non supprimer si en colonne a

Merci Papou-net,

La Macro fonctionne parfaitement. Merci pour tout.
Grace à toi ce post est clos.

Merci