Algorithme Ecartements avec capacité

Bonjour.

Ce post est dans la continuité de celui-ci:

https://forum.excel-pratique.com/excel/detection-de-fourche-et-boucle-dans-l-algo-des-ecartements-t27951.html

En effet il faut appliquer le même algorithme , celui des écartements avec une contrainte supplémentaire, celui de la capacité du camion.

Le principe est le suivant (je répète encore):

en partant du distancier entre 50 villes et un dépôt central, en utilisant la méthode des écartements et en tenant compte les contraintes de capacités des camions (10 tonnes chacun), définir les différentes tournées à effectuer.

Rq: on peut utiliser autant de camion qu'on veut, sachant qu'un seul camion sera affecté par tournée.

J'ai pas de problème pour générer les capacités, par contre je n'arrive pas à l'intégrer dans le dernier fichier de Banzai64. J'ai essayé de faire avec un booléen mais je tourne en rond.

Pouvez-vous m'aider s'il vous plaît ?

Merci.

Bonjour

A tester

Salut Banzai64.

Le résultat est cohérent.

Je vais voir le code si j'ai tous compris et je te tiens au courant.

L'algorithme est celui voulu.

Et le code est parfaitement compréhensible.

Je remercie particulièrement Banzai64 pour son aide et ses explications.

Bonjour

je relance ce sujet espérant que banzai est tjs vivant

donc en fait je cherche le meme programme avec 200 villes :s je pense que c pas fesable avec le code que vous avez fais

svp vous avez une idée??

Bonjour

Pour le moment je n'ai pas d'autres idées

espoir perdu

Bonjour

Je confirme : je n'ai pas d'autre idée

Mais j'ai testé avec 200 villes

La macro fait son boulot

Durée 00:40:03

Je ne garanti pas si les résultats sont bons

Mais rien ne t'empêche (si tu as du temps) de faire le test, juste à shunter la sécurité

Modifies le début de la macro Main()

'.
'.
NbVille = WsDista.Range("A1")

  If NbVille < 3 Then
    MsgBox "Minimum 3"
    Exit Sub
  End If

  GenererDistanceTonnage
'.
'.
Rechercher des sujets similaires à "algorithme ecartements capacite"