1. Ce site utilise des "témoins de connexion" (cookies) conformes aux textes de l'Union Européenne. Continuer à naviguer sur nos pages vaut acceptation de notre règlement en la matière. En savoir plus.

Tri "complexe" OF père & fils- résolu

Discussion dans 'Forum Excel' démarrée par bibbip35, 24 Août 2018.

  1. bibbip35

    bibbip35 XLDnaute Occasionnel

    Inscrit depuis le :
    10 Avril 2014
    Messages :
    191
    "J'aime" reçus :
    0
    Bonjour à tous

    Dans le cadre de mon travail , je suis en train de réaliser un planning de Production avec des OF ( Ordre de Fabrication ) avec des OF dits de tête ( Principale ) et des Sous-OF
    Aujourd'hui , les OF sont extrait de mon ERP sans aucune suite logique entre chaque niveau
    Ce que je souhaiteras c'est pouvoir trier ces OF d'une manière Hiérarchisée c'est à dire le Niveau 1 d'abord
    puis le niveau 2, etc...

    Pour être plus clair , je vous mets un exemple de ce que je souhaite faire en pièce jointe

    Merci encore a tous , car je bloque sur ce point , malgré plusieurs essai avec des Si , etc...

    Bibbip35
     

    Pièces jointes:

  2. Chargement...

    Discussions similaires - Tri complexe père Forum Date
    tri complexe par selection Forum Excel 14 Novembre 2017
    Formules matricielles complexes Forum Excel 27 Janvier 2017
    Macro complexe attribution d'emplacements Forum Excel 28 Décembre 2016
    XL 2013 tri complexe Forum Excel 14 Décembre 2015
    Tri complexe Forum Excel 17 Février 2014

  3. bibbip35

    bibbip35 XLDnaute Occasionnel

    Inscrit depuis le :
    10 Avril 2014
    Messages :
    191
    "J'aime" reçus :
    0
    Bonsoir à tous

    Je me permets de lancer le sujet car malgré plusieurs essais et plusieurs recherches je ne arrive pas hiarchiser mes OF père et fils

    J ai bien trouvé la macro de Jacques boisgontier qui devrait répondre à mon besoins mais je n arrive pas transposer la macro

    http://boisgontierjacques.free.fr/pages_site/Recursivite.htm

    J ai également trouvé un sujet similaire sur le forum , mais même bilan je ne m ensort pas ...

    https://www.excel-downloads.com/threads/relation-père-fils-pour-arborescence-à-partir-dun-tableau.220307/

    Est-ce que vous pourriez m aider car je suis sec niveau idée

    Merci à tous

    Bibbip35
     
  4. BOISGONTIER

    BOISGONTIER XLDnaute Barbatruc

    Inscrit depuis le :
    28 Septembre 2007
    Messages :
    7050
    "J'aime" reçus :
    470
    Habite à:
    Montigny
    Page d'accueil :
    Utilise:
    Excel 2003 (PC)
    Bonjour,

    Il y a des erreurs dans l'exemple fourni.
    J'ai une solution pour un seul père et plusieurs pères


    Code (Text):
    Dim n, ligne, debOrg, Tbl()
    Sub organigramme()
      Tbl = Range("A2:B" & [A65000].End(xlUp).Row).Value
      Set debOrg = [d1]
      debOrg.Offset(1).Resize(25, 4).Clear
      n = UBound(Tbl)
      ligne = 0
      For k = 1 To n
        If Tbl(k, 2) = "" Then Ecrit Tbl(k, 1), 1, Tbl(k, 2)
      Next k
    End Sub

    Sub Ecrit(parent, niv, comp) ' procédure récursive
      ligne = ligne + 1
      debOrg.Offset(ligne) = parent: debOrg.Offset(ligne, 1) = comp
      For i = 1 To n
        If Tbl(i, 2) = parent Then Ecrit Tbl(i, 1), niv + 1, Tbl(i, 2)
      Next i
    End Sub
     
    http://boisgontierjacques.free.fr/fichiers/Cellules/ConvPereFils.xls
    http://boisgontierjacques.free.fr/fichiers/Cellules/ConvPereFilsCoul.xls

    Tracé d'organigrammes multiples

    http://boisgontierjacques.free.fr/fichiers/Cellules/TraceOrganigramme.xls

    Boisgontier
     

    Pièces jointes:

    Dernière édition: 6 Décembre 2018
  5. bibbip35

    bibbip35 XLDnaute Occasionnel

    Inscrit depuis le :
    10 Avril 2014
    Messages :
    191
    "J'aime" reçus :
    0
    Bonjour Mr boisgontier

    Merci pour votre retour ; Quest-ce que vous voulez dire quand vous parler d'erreur dans l'exemple ?

    Sinon , j'ai regardé votre Macro qui est juste GENIAL , mais j’aurais deux Questions
    - Est-il possible d'ajouter le Niveau de l'OF afin que cela soit plus visuel
    - Est-il possible d'avoir OF identique qui ont des pères différent ?

    Merci par avance

    Bibbip
     
  6. BOISGONTIER

    BOISGONTIER XLDnaute Barbatruc

    Inscrit depuis le :
    28 Septembre 2007
    Messages :
    7050
    "J'aime" reçus :
    470
    Habite à:
    Montigny
    Page d'accueil :
    Utilise:
    Excel 2003 (PC)

    Pièces jointes:

    Dernière édition: 6 Décembre 2018
  7. bibbip35

    bibbip35 XLDnaute Occasionnel

    Inscrit depuis le :
    10 Avril 2014
    Messages :
    191
    "J'aime" reçus :
    0
    Merci infiniment !

    Une dernière question est il possible d ajouter au niveau l OF de tête c est l OF père principal

    Exemple

    F180567
    F187967 F180567 F180567-1 Niv 1
    F186543 F187967 F180567-2 niv 2
    F178888 F180567 F180567-1 niv 1
    F177859 F178888 F180567-2 niv 2

    En espérant avoir été clair

    Merci encore !
     
  8. BOISGONTIER

    BOISGONTIER XLDnaute Barbatruc

    Inscrit depuis le :
    28 Septembre 2007
    Messages :
    7050
    "J'aime" reçus :
    470
    Habite à:
    Montigny
    Page d'accueil :
    Utilise:
    Excel 2003 (PC)
    Bonjour,

    Cf PJ

    Boisgontier
     

    Pièces jointes:

  9. bibbip35

    bibbip35 XLDnaute Occasionnel

    Inscrit depuis le :
    10 Avril 2014
    Messages :
    191
    "J'aime" reçus :
    0
    Bonjour

    Merci pour ce retour et pour le travail réalisé !
    Par contre , je pense que je me suis mal expliqué ce que je souhaiterais
    c'est de faire apparaître l'OF de Tête pour tous les Niveau

    F180567
    F187967 F180567 F180567-1 Niv 1
    F186543 F187967 F180567-2 niv 2
    F178888 F180567 F180567-1 niv 1
    F177859 F178888 F180567-2 niv 2

    Merci encore pour votre aide

    Bibbip35
     
  10. BOISGONTIER

    BOISGONTIER XLDnaute Barbatruc

    Inscrit depuis le :
    28 Septembre 2007
    Messages :
    7050
    "J'aime" reçus :
    470
    Habite à:
    Montigny
    Page d'accueil :
    Utilise:
    Excel 2003 (PC)
    Bonjour,

    CF PJ

    Boisgontier
     

    Pièces jointes:

  11. bibbip35

    bibbip35 XLDnaute Occasionnel

    Inscrit depuis le :
    10 Avril 2014
    Messages :
    191
    "J'aime" reçus :
    0
    Merci çà réponds parfaitement a ma question de base
    Par contre , je viens de me rencontre qu'avec ce que je vous demander
    quand je trie ça mélange organisation hiérarchique issu de la macro

    Pensez-vous qu'il est possible de generer a la place des Niveau 1-2-3-etc...
    Une notion de tirets qui me permettrait d'effectuer un Tri qui ne modifierai pas l'organisation

    F15610ABB
    F15610ABB-1
    F15610ABB-1-1
    F18010ALD
    F18010ALD-1
    F18010ALD-1-1
    F18010ALD-1-1-1
    F18010ALD-2
    F18010ALD-2-1
    F18010ALD-2-1-1
    F18030OSE
    F18030OSE-1
    F18030P2I
    F18030P2I-1
    F18030P2I-2

    Je suis vraiment désolé de vous solliciter encore , mais j'avoue ne pas assez maitriser comme vous le VBA

    BibBip35
     

    Pièces jointes:

  12. BOISGONTIER

    BOISGONTIER XLDnaute Barbatruc

    Inscrit depuis le :
    28 Septembre 2007
    Messages :
    7050
    "J'aime" reçus :
    470
    Habite à:
    Montigny
    Page d'accueil :
    Utilise:
    Excel 2003 (PC)
    Bonsoir,

    cf PJ

    Boisgontier
     

    Pièces jointes:

  13. bibbip35

    bibbip35 XLDnaute Occasionnel

    Inscrit depuis le :
    10 Avril 2014
    Messages :
    191
    "J'aime" reçus :
    0
    Merci Boisgontier
    C est impeccable

    Merci encore pour votre aide !!!

    Bibbip35
     

Partager cette page