Найти сумму любых из имеющихся чисел максимально приближенную к "Х"

[valerij]

Найти сумму любых из имеющихся чисел максимально приближенную к "Х", количество слагаемых не принципиально.
ряд чисел: 2553, 2111, 1825, 2362, 4297, 4551, 3433, 2372, 3115.
Х=8000

[Serge_Bliznykov]

1)
ответ: 4551+3433=7984

2) посмотрите тему:
подбор группы файлов до заданого размера

[valerij]

Сообщение от Serge_Bliznykov

1)
ответ: 4551+3433=7984

2) посмотрите тему:

Не подходит.
Мне просто макрос нужен

[MCH]

Решение простым перебором всех возможных вариантов, не оптимизировано по скорости, т.к. максимально используются формулы в ячейках, а не переменные (ускорить можно используя массивы), но зато код небольшой

[Serge_Bliznykov]

Не подходит.

Воля ваша.. Хозяин - барин!

Мне просто макрос нужен

а макрос, который в той теме выложен, чем не устраивает?..

[valerij]

Сообщение от Serge_Bliznykov

а макрос, который в той теме выложен, чем не устраивает?..

Я не нашел его, там, все примеры, просмотрел, требуют времени..
А от MCH, все ясно.
Спасибо!!

[MCH]

А задачу можно решить и без макросов. Попробуйте ввести в Е1 различные значения

[valerij]

Сообщение от MCH

А задачу можно решить и без макросов. Попробуйте ввести в Е1 различные значения

Отлично, дякую!!!
---------------
| ^^пиво^^ \\|""\\_,_
|___________||___|__|)
(@)(@)""*|(@)(@)**(@)

[IgorGO]

МСН, отличное вступление!

добавил рюшечек и бантиков на лист.
формула проставит единички напротив тех значений, которые вошли в сумму.
можно использовать 14 значений для подбора заданной суммы.
Еще немного поправить формулу и для 2007 с 1 млн. строк можно было бы набирать сумму из 20 заданных значений.

[valerij]

Сообщение от IgorGO

добавил рюшечек и бантиков на лист..

Игорь, вот так это выглядит в 2003, хотя стоит Office 2007 File Format Converters.
Че не так??