Rendre les cellules vides au lieu de 0 et ""

Merci de me répondre,
la fonction ESTVIDE qui teste si la case est vraiment vide me dit qu'elle n'est pas vide et j'ai besoin de voir les 0

Bonjour PHILOU10120,
Je te remercie de me venir en aide,
Ce que je veux, c'est de rendre réellement vide les cellules contenant un 0 ou ayant dans une formule ""
J'ai besoin de visualise les 0
J'ai trouvé ceci sur le Net, mais je ne sais pas si ça répond à ma demande et comment m'en servir :

Rendre les cellules vides au lieu de 0 et "".

'Le code 32 est l'espace "normal"
Sub EffaceCar32()
For Each X In Selection
If X.Value = Chr(32) Then X.ClearContents
Next
End Sub

'Le code 160 est l'espace insécable.
Sub EffaceCar160()
For Each X In Selection
If X.Value = Chr(160) Then X.ClearContents
Next
End Sub

Sub EffaceCar160Car32()
For Each X In Selection
If X.Value = Chr(160) Or X.Value = Chr(32) Then X.ClearContents
Next
End Sub

help, personne pour me guider ?
Merci à vous.