Наименький остаток

Весь MS Office, программирование на Visual Basic for Applications и MS VB

Модератор: Naeel Maqsudov

Ответить
kuznetsovSergey
Сообщения: 163
Зарегистрирован: 05 мар 2009, 11:27

Люди добрые, помогите с алгоритмом решения проблемы. Ничего не приходит на ум.
помогите максимально выгодно расчитать макросом в EXCEL, слудующую задачку.

Дана палка длиной 6000 мм

мне надо всегда разное количество кусков, и всегда разной длины.

я пишу к примеру на каждой строчке

2000 мм 2 шт
1800 мм 1 шт
1400 мм 1 шт
800 мм 5 шт
600 мм 3 шт

и т.д.

И макрос посчитал максимально выгодную комбинацию, сколько нужно 6 метровых палок, и как нарезать каждую из них, что бы было меньше всего остатка ?

Заранее спасибо !!
Аватара пользователя
VictorM
Сообщения: 794
Зарегистрирован: 23 окт 2006, 01:44
Откуда: Lugansk, Ukraine
Контактная информация:

Посмотрите примеры во вложении.
Вложения
раскрой.zip
(16.31 КБ) 25 скачиваний
"Дайте людям рыбы, и вы накормите их на весь день;
научите их ловить рыбу - и вы накормите их на всю жизнь".
kuznetsovSergey
Сообщения: 163
Зарегистрирован: 05 мар 2009, 11:27

ну дело в том, что в приложенном примере есть уже какие то варианты. А я не могу привязываться к определенности. У меня всегда меняется и длина и количесов кусков. Таблица тут врят ли подойдет, нужен алгоритм, нахождения получения, минимального расхода
Аватара пользователя
VictorM
Сообщения: 794
Зарегистрирован: 23 окт 2006, 01:44
Откуда: Lugansk, Ukraine
Контактная информация:

ну дело в том, что в приложенном примере есть уже какие то варианты
ну дело в том, что примеры выложены для понимания процесса и использования как основа в своих разработках.
А
нужен алгоритм, нахождения получения, минимального расхода
то это уже отдельная, огромная тема и объект для написания книг, диссертаций и обсуждений.
Алгоритм оптимального раскроя
Моделирование и решение задачи одномерного раскроя материала различных длин методом отсекающих плоскостей
***
кстати, посмотрите вот это, может натолкнет на нужное решение
Одномерный раскрой
"Дайте людям рыбы, и вы накормите их на весь день;
научите их ловить рыбу - и вы накормите их на всю жизнь".
Ответить