effacer formules

[stephane]

Bonsoir le forum

Comment peut on en vba effacer certaine formule d'une plage

quand par exemple le resultat de la formule =0

😱 Merci d'avance

Stephane

 

[Gérard DEZAMIS]

Bonsoir Stéphane

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim c As Range
For Each c In Range('A1:A100')
If c.Value = 0 Then
c.ClearContents
End If
Next
End Sub

Plage concernée par ce nettoyage = A1:A100


@+ GD

 

[stephane]

quelle rapidité
Merci je vais essayer