Cellules en double

Résolu
mic6259 -  
mic6259 Messages postés 371 Statut Membre -
Bonjour,
J'ai des lignes disposées comme suit 9 cellules qui commencent par B2 à J2 puis de R2 à Z2 etc... avec toujours le même espace de 7 cellules.
Dans ces cellules j'ai 5 chiffres et 4 cellules vide mis aléatoirement et serait-il possible de retrouver si il y a les même cellules disposées de la même manière ailleurs?.
Si c'est possible soit sous formes de formules ou en VBA.
Merci a vous

5 réponses

  1. Frenchie83 Messages postés 2254 Statut Membre 339
     
    Bonjour
    A tester
    https://www.cjoint.com/c/EImiSUTFVtw
    Cdlt
    0
    1. mic6259
       
      Merci
      C'est pas mal mais j'ai beaucoup de ligne a contrôler et çà fait beaucoup de formules a ajouter.
      En VBA peut-être
      Merci encore
      0
  2. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    Bonjour

    Combien as tu de blocs ? B-J... R-Z.... ?
    et combien de lignes (environ) "beaucoup" est flou en VBA
    Michel
    0
    1. mic6259
       
      Bonjour
      En commençant par B2 j'ai 600 lignes de A2 a A600 avec un espace tous les 3 lignes jusqu'à la colonne BF2.
      Cdlt
      0
  3. Frenchie83 Messages postés 2254 Statut Membre 339
     
    Re mic6259, bonjour michel_m
    En VBA, on recopie les formules et on remplace par les valeurs
    Sub Restitution()
        Application.ScreenUpdating = False
        Range("AB2:AB" & [AB100000].End(xlUp).Row).FormulaR1C1 = "=IF(IF(RC[-26]<>"""",1,0)+IF(RC[-25]<>"""",2,0)+IF(RC[-24]<>"""",4,0)+IF(RC[-23]<>"""",8,0)+IF(RC[-22]<>"""",16,0)+IF(RC[-21]<>"""",32,0)+IF(RC[-20]<>"""",64,0)+IF(RC[-19]<>"""",128,0)+IF(RC[-18]<>"""",256,0)=IF(RC[-10]<>"""",1,0)+IF(RC[-9]<>"""",2,0)+IF(RC[-8]<>"""",4,0)+IF(RC[-7]<>"""",8,0)+IF(RC[-6]<>"""",16,0)+IF(RC[-5]<>"""",32,0)+IF(RC[-4]<>"""",64,0)+IF(RC[-3]<>"""",128,0)+IF(RC[-2]<>"""",256,0),""Ok"",""Non ok"")"
        Range("AC2:AC" & [AB100000].End(xlUp).Row).FormulaR1C1 = "=IF(AND(RC[-27]=RC[-11],RC[-26]=RC[-10],RC[-25]=RC[-9],RC[-24]=RC[-8],RC[-23]=RC[-7],RC[-22]=RC[-6],RC[-21]=RC[-5],RC[-20]=RC[-4],RC[-19]=RC[-3]),""Ok"",""Non ok"")"
        Range("AB2:AC" & [AC100000].End(xlUp).Row).Value = Range("AB2:AC" & [AC100000].End(xlUp).Row).Value
    End Sub

    Cdlt
    0
  4. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    Tu as 3 blocs de données: il faut 3 blocs identiques ou compraison 1-2, 2-3,1-3 ?

    Dispoition identique vide-non vide
    ou
    valeurs et dispositions identiques ?

    merci de joindre le classeur afin de m'éviter à passer pas mal de temps à refaire le classeur

    Mettre le classeur sans données confidentielles en pièce jointe sur https://www.cjoint.com/
    et coller le raccourci proposé (clic droit) dans le message de réponse
    Dans l'attente


    Michel
    0
    1. mic6259
       
      Bonsoir
      J'envoie demain la pièce jointe car ce soir je suis pris
      Merci encore bonne soirée
      0
    2. mic6259 Messages postés 371 Statut Membre 1
       
      Bonjour
      Pour faire simple j'ai diminuer le fichier.
      Le but c'est de trouver si il y a des lignes de 9 cellules identiques avec les mêmes endroits des cellules vides.
      Par contre serait-il possible de m'expliquer comment ça marche car j'aurais d'autres colonnes a mettre pour avoir 1800 grilles
      Merci beaucoup
      https://www.cjoint.com/c/EInidkdfLMq
      0
      1. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320 > mic6259 Messages postés 371 Statut Membre
         
        Re,

        dans la demande initiale la séparation est de 7 colonnes et non 1 dans la pièce jointe et on s'arr^tait à 3 blocs(colonne BF2) et non 4
        ?????
        pas très sérieux

        J'ai demandé
        Tu as 3 blocs de données: il faut 3 blocs identiques ou compraison 1-2, 2-3,1-3 ?

        aucune réponse !

        J'ai également demandé
        Disposition identique vide-non vide
        ou
        valeurs et dispositions identiques ?

        aucune réponse !


        il est ainsi inutile que je perde mon temps face à un tel dilletantisme
        0
      2. mic6259 Messages postés 371 Statut Membre 1 > michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention  
         
        Re,
        Il faut prendre la seconde demande avec des grilles de 9 cellules de 3 lignes avec un espace entre eux,et si c'est possible de savoir si il y a dans toutes ces grilles une ligne de 9 cellules identique ou pas.
        C'est vrai qu'il ne faut pas perdre son temps si c'est pas possible.
        0
      3. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320 > mic6259 Messages postés 371 Statut Membre
         
        C'est pas vrai !!!

        Disposition identique vide-non vide
        ou
        valeurs et dispositions identiques ?


        Tu comprends rien ou tu tu te F..... de ma gueu....?
        tu aurais pu te donner la peine de dire la quelle des 2 est la bonne! le code est complètement différent suivant le cas

        ta manière d'agir: démerdez vous avec ca

        dernière chose:
        c'est facile niveau débutant: alors, au boulot !

        Adieu
        0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Frenchie83 Messages postés 2254 Statut Membre 339
     
    Bonjour mic6259, Bonjour michel_m
    Est-ce que cela correspond?
    https://www.cjoint.com/c/EInnPy4kFrw
    Cdlt
    0
    1. mic6259 Messages postés 371 Statut Membre 1
       
      Bonjour Frenchie
      C'est exactement ce que je recherche
      Merci de votre aide
      0