Organigramme défaillant

cheyenne63

XLDnaute Occasionnel
Bonjour
J'ai téléchargé le classeur joint sur l'excellentissime site de J. Boisgontier.
Je ne comprends pas pourquoi la macro de la seconde feuille ne fonctionne pas avec les données ci-jointes.
Merci d'avance
 

Pièces jointes

  • HierarchieShapes1Vertical.xlsm
    40.6 KB · Affichages: 45

BOISGONTIER

XLDnaute Barbatruc
Repose en paix

Pièces jointes

  • Copie de HierarchieShapes1Vertical-1.xlsm
    52.8 KB · Affichages: 42
Dernière édition:

eriiic

XLDnaute Barbatruc
Re : Organigramme défaillant

Bonjour,

Pour une raison inconnue, dans la codification, il ne faut pas utiliser la lettre C en position 2.
J'ai l'impression qu'il se fait des noeuds (c'est le cas de le dire) avec le connecteur créé auparavant sur le parent "B"
D'ailleurs le nom du Shapes est "Bc" et non "BC"
Il y a un lien avec les 4 lignes plus bas telles que :
Code:
forga.Shapes.AddConnector(msoConnectorElbow, 100, 100, 100, 100).Name = parent & "c"
Si on remplace sur les 4 lignes "c" par "c_" plus de pb.
eric
 
Dernière édition:

Membres actuellement en ligne

Statistiques des forums

Discussions
312 505
Messages
2 089 070
Membres
104 020
dernier inscrit
Mzghal