Supprimer valeur zéro des cellules sur excel

Résolu
Suricate55 -  
 suricate55 -
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

2 réponses

  1. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    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
    1. Suricate55
       
      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
    2. suricate55
       
      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
  2. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    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