[Excel] Mise en forme de données

Bonjour le Forum,

Je rencontre quelques difficultés au niveau de la suppression de cellules avec conditions.

Quelques explications s'imposent : je suis sous excel 2003, j'ai un tableau de 11 colonnes et d'environ 10.000 lignes soit environ 110.000 entrées (admirez la multiplication XD).

J'aimerais réussir à effacer les données qui reviennent 11 fois et uniquement 11 fois dans mon tableau.

Comment supprimer les "onzlons"?

Mes recherches sur le net n'ont pas abouti.

Merci d'avance.

5 réponses

  1. Contributeur
    Bonsoir tout le monde,

    Je vois 2 problèmes dans les propositions :
    La macro de pilas traite les couleurs mises manuellement et non par mise en forme conditionnelle.
    Et le nb.si n'est pas utilisable car dès qu'on va vider une des cellules concernées leur nombre va passer à 10 et les autres perdront leur couleur...

    Une autre proposition par macro, il faudra adapter la plage pl à sa vraie valeur (actuellement A2:K100)
    Vue la tailles des données je travaille en mémoire pour qu'elle soit plus rapide, sauf pour vider les cellules au cas ou il y ait des formules. S'il n'y en a pas et beaucoup de cellules à vider on peut accélérer encore

    dictionary.xls
    à tester...
    eric
    4
    1. Contributeur
      Salut Eric
      exact, pour les deux premières remarques
      crdlmnt
      0
    2. Contributeur
      Bonjour eriic et Vaucluse...

      Mea culpa, en effet j'ai été un peu leger sur ce coup...

      A+
      0
  2. Contributeur
    Bonjour
    Pour ma part, je peux vous donner un tuyau pour les identifier, il suffira qu'une bonne âme compétente, et il y en a foule ici vous donne une macro pour effacer des cellules selon les couleurs.(ça , ça n'est pas dans mes compétences)
    donc pour les mettre en couleur:
    sélectionner le champ, pour l'exemple A1:K10000 à adapter
    Format / mise en forme conditionnelle
    la formule est:
    =NB.SI($A$1:$K$10000;A1)=11
    choisir une couleur.
    Reste plus qu'à effacer toutes les cellules de cette couleur, et là, je reste aux aguets de la solution qui ne devrait pas tarder à venir.
    Crdlmnt

    Demandons nous si nous ne sommes pas seuls à comprendre ce que l'on explique?
    1
    1. Bonjour Vaucluse,
      Merci pour votre réponse et votre rapidité.
      0
  3. Contributeur
    Bonjour,

    Pour compléter la réponse de Vaucluse voici une petite macro en VBA qui efface toutes les cellules si elles sont rouge :

    
    Sub Effacer_Rouge()  
    
    For lig = 1 To 10000  
        For col = 1 To 11  
            If Cells(lig, col).Interior.ColorIndex = 3 Then  
                Cells(lig, col) = ""  
            End If  
        Next col  
    Next lig  
    
    End Sub  
    
    


    Voila, a adapter à une autre couleur s'agissant de 11 cela peut-être les bleus ! ;)

    A+
    Cordialement,
    1
    1. Contributeur
      Bonjour,
      Une précision : s'agit-il de supprimer la ligne entière lorsque les onze valeurs sont identiques dans les onze colonnes de cette ligne ?
      Ou simplement d'effacer les cellules situées n' importe où lorsqu'elles apparaissent onze fois dans tout le tableau ?

      A+
      0
      1. Bonjour pilas31,
        Il s'agit d'effacer les cellules situées n'importe où dans le tableau du moment qu'elle apparaissent onze fois.
        (les valeurs ne sont pas classées par ligne)
        Ciao
        0