code VBA pour Macro recherche et remplace

[mavean]

Bonsoir

Dans un tableau (qui s'étend de I13 à M81) qui effectue des calculs (donc avec des formules).
J'ai des (zéro) soit rentré directement soit qui sont le résultat d'une formule).
j'aimerais attribué un bouton à une macro qui remplace toutes les cellules ayant un 0 (zéro) par une cellule vide.

J'ai essayé ce code
Sub Macro1()
Range("i13:m81").Select
Selection.Replace What:="0", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub

qui marche la ou le zéro n'est pas le résultat d'une formule

Qui pour m'aider ?

Merci.

 

[Paf]

Re : code VBA pour Macro recherche et remplace

bonjour

sans VBA, dans les options Excel désactiver Valeurs Zéro, les "0" issus de saisie ou de formules n'apparaîtront plus.

Par contre sous XL2010, je ne sais pas exactement où ça se trouve .

A+

 

[grisan29]

Re : code VBA pour Macro recherche et remplace

bonjour
sous excel 2013 c'est fichier puis options puis options avancées et chercher ou ça se trouve

Pascal

 

[DoubleZero]

Re : code VBA pour Macro recherche et remplace

Bonjour à toutes et à tous,

Comme ceci ?

Option Explicit
Sub Zéro_zéro()
    Dim c As Range
    For Each c In Range("plage")    ' à adapter
        If c = 0 Then c = ""
    Next
End Sub

A bientôt

 

[Lone-wolf]

Re : code VBA pour Macro recherche et remplace

Bonjour mavean, l'équipe du jour

Avec excel 2010, c'est exactement comme la dit grisan.


A+