VBA ordo

[hatem9294]

j'ai un problème d'ordonnancement que j'arrive pas à formaliser sous le language VBA. il s'agit d'un pb d'ordonnancement d'un programme de fabrication qui permet de minimiser le temps de changement d'outillage (tambour et bag ). pour cela j'aimerais construire un programme VBA qui permet de construire des séquences d'articles de la manière suivante:
on prend un article au hazard, on met derrière un article qui utilise le même bag et le même tambour (si celui ci existe) sinon on cherche un article qui utilise le même bag sinon le même tambour. et dans le cas echéant, on enchaine avec un article qui n'utilise ni le même tambour ni le même bag et comme çà on aura construit une séquence complète.

l'idée qui m'est venu en tête mais que j'arrive pas à formaliser est la suivante:
on regroupe les articles par Bag (ceux qui utilisent le même bag ensemble) puis à l'interieur de ces groupes on essaye de mettre les moules qui s'utilisent avec d'autres bag aux extrémités pour venir les raccoler. ceci nécessite le calcul de l'occurence du moule dans les autres groupes (un groupe est l'ensemble des articles utilisant le même bag).

ci joint un exemple d'ordonnancement.
je compte sur votre générosité et votre motivation et vos idées précieuses pour qu'on ouvre une petite discussion afin de résoudre ce problème.

 

[JeanMarie]

Re : VBA ordo

Bonsoir

J'ai essayer un tri sur le "Tambour" en première clé et sur "Tag" en seconde clé.

J'obtiens à 95 % l'exemple que tu as donné.

@+Jean-Marie

 

[hatem9294]

Re : VBA ordo

bonsoir

un double tri n'est pas une solution optimale. j'ai essayé mais çà marche pas à tout les coups ptre çà a marché sur cet exemple. mais en générale, si on fait un tri sur les bag puis sur les tambours, on arrive à regroupper par bag mais les tambours seront regroupé par ordre croissant ce qui n'est pas le but du jeu. on fait, dans le resultat final, ce qui importe c'est le fait d'enchainer les mêmes tambours les uns derrière les autres.

 

[CBernardT]

Re : VBA ordo

Bonsoir Hatem9294 et JeanMarie,

Un essai d'ordonnancement par macro :

1- Bouton "ORDONNER" pour lancer la macro ;
2- Si pas d'articles alors arrêt de la macro ;
3- Résultat ordonné dans la feuille "Ordo" ;
4- les articles ordonnés sont placés à droite pour mémoire.

Cordialement

Bernard

 

[CBernardT]

Re : VBA ordo

Bonjour Hatem9294, JeanMarie et le forum,

Quelques améliorations :
1- macro "Reprise" pour relancer la macro "Ordonner" ;
2- Boucles do loop à la place de Re: Goto Re ;
3- Tri en début de macro de la base ;

Cordialement

Bernard

 

[hatem9294]

Re : VBA ordo

Je vous remercie énormément de l'aide que vous m'avez donné mais il y a encore un petit pb. c'est de ma faute car apperement je me suis mal exprimé.
en fait, ds le résultat final, il faux que l'algorithme enchaine par le même tambour s'il trouve pas un article qui satisfait les 2 premiers cas (1er: même bag et même tambour et 2ième : même bag uniquement ). dans le cas ou il trouve le même tambour il faut qui enchaine sur cet article (même si celui ci est déja ordonnancé: dans ce cas il déplace le groupe pour le racoller au premier). l'ordonnancement à un instant t- T est mis à jour à l'instant t. c'est pour çà qu'il vaut construire des groupes à part et qu'à l'intérieur de ces groupe en calcul l'occurence du tambour (le nbr des autres groupes où il apparait) et en fonction de cette occurence en réarrange la disposition du groupe. Exp: si le tambour apparait une seule fois (ailleurs que dans son groupe d'origine) on le met à l'extrémité et on vient racoller l'autre groupe.

Ci joint un fichier qui explique le seul problème de l'algorithme de bernard.

 

[CBernardT]

Re : VBA ordo

Bonjour à tous,

Algorithme entièrement revu.

J'espère que cela sera judicieux ?

Cordialement

Bernard