Supprimer valeur zéro des cellules sur excel

Résolu/Fermé
Suricate55 - Modifié par Suricate55 le 13/11/2011 à 05:33
 suricate55 - 29 nov. 2011 à 23:38
Excel2007

Bonjour,

Comment faire pour supprimer et non effacer toutes les valeurs zéro des cellules d'une base de donnés en un seul clic à partir d'une macro ou visuel basic
A voir également:

2 réponses

eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 249
13 nov. 2011 à 11:05
Bonjour,

supprimer et non effacer
Tu veux supprimer les cellules et les autres valeurs remontent d'un cran ?
Et si tu supprimes A3 par exemple, y'a-t-il des valeurs liées en B, C, ... à supprimer aussi ?

eric
0
Bonjour,

Non! aucune valeur liée car j'aurais copier et coller seulement la valeur ils n'y aurait plus de formule.

J'aimerais que les cellules vide ne soient pas égale à zéro mais qu'elle soit contenant vide et non vide test"" pour que le texte adjacent à la cellule s'affiche sur le reste de l'autre cellule car je suis restreint par un cadre limité.
0
J'ai utilisé la logique de ta formule et maintenant ça fonctionne

ActiveSheet.Unprotect
Range("F15:F193,N15:N193").Select
For Each MyCell In Selection
If MyCell.Value Like "0" Then
MyCell.ClearContents
End If
Next
End Sub

Merci
0
eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 249
13 nov. 2011 à 15:15
Re,

Ca se fait très facilement par formule mais bon :
Sub suppZéro()
    Dim c As Range
    For Each c In Selection
        If c = 0 Then c = ""
    Next c
End Sub
Traite la plage sélectionnée.

eric
0