Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.93/58: Рейтинг темы: голосов - 58, средняя оценка - 4.93
0 / 0 / 0
Регистрация: 18.07.2014
Сообщений: 16

Сумма всех комбинаций значений из столбца чисел

18.07.2014, 16:44. Показов 13344. Ответов 45
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Задача для функции:
  1. Выделяем столбец, состоящий из чисел.
  2. Необходимо суммировать все возможные комбинации из чисел этого столбца.
  3. Записать суммы всех комбинаций в столбец

Например n=4:
1
2
3
4
Кликните здесь для просмотра всего текста
суммы
3
4
5
5
6
7
6
7
8
9
10
Надеюсь, что ничего не забыл


Знаю о существовании топика ПОДБОР всех возможных комбинаций СУММЫ ячеек, но так как я полный дилетант в VBA, я не смог подкорректировать дельные советы по свой случай.

Прикрепляю файл, для которого это нужно провернуть.
123.xls
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
18.07.2014, 16:44
Ответы с готовыми решениями:

Сумма всех чисел из одного столбца ListBox
Как узнать итоговую сумму всех товаров? данные в листбокс заносятся из другой формы, следовательно товаров может быть разное количество....

Сумма вероятностей всех возможных комбинаций
Здравствуйте. Объясните, пожалуйста. Например, есть три символа, каждому присвоена вероятность, а в сумме эти вероятности дают...

Сумма произведений чисел комбинаций для k из n
Есть набор чисел. Их количество равно n. Нужно просчитать количество комбинаций для k из n (т.е., например, для 5 из 8). Это решил 3-мя...

45
0 / 0 / 0
Регистрация: 18.07.2014
Сообщений: 16
25.07.2014, 09:23  [ТС]
Студворк — интернет-сервис помощи студентам
Цитата Сообщение от SoftIce Посмотреть сообщение
попробуйте все Integer заменить на Long
Это просто восхитительно! Только сейчас возникла возможность это опробовать и, что очень классно, количество элементов в столбце не ограничена 65 тыс. Скажите, в топике было упомянуто ограничение для 2003 экселя в виде 65 тыс. элементов. Как алгоритм будет себя чувствовать в старых версиях экселя. У меня, к сожалению, отсутствует возможность это апробировать.
0
25.07.2014, 18:03

Не по теме:

Цитата Сообщение от SoftIce Посмотреть сообщение
попробуйте все Integer заменить на Long
OMG, лучший ответ! это наверное гением нужно быть...

0
es geht mir gut
 Аватар для SoftIce
11275 / 4761 / 1183
Регистрация: 27.07.2011
Сообщений: 11,439
25.07.2014, 18:17
Цитата Сообщение от Антихакер32 Посмотреть сообщение
OMG, лучший ответ! это наверное гением нужно быть...
Где ты видишь лучший ответ? Разуй глаза. Я просто подсказал человеку.
2
25.07.2014, 18:26

Не по теме:

SoftIce, друг, -к тебе притензий нет, я удивляюсь тому, что восхищаются типами данных,
как это было писанно в сообщении #41

0
6180 / 945 / 313
Регистрация: 25.02.2011
Сообщений: 1,381
Записей в блоге: 1
27.07.2014, 10:47
Какова конечная задача вывод всех возможных сумм? поиск оптимального варианта?

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

Выкладываю еще раз.

Одно из решений - "Ограниченный перебор" позволяет выводить все подходящие решения. при этом если не нужна конкретная сумма а нужно вывести все варианты сочетания ограниченного количества чисел, то необходимо задать искомую сумму превышающую сумму всех слагаемых и задать такой же допуск, ограничив при этом количество слагаемых.
0
6180 / 945 / 313
Регистрация: 25.02.2011
Сообщений: 1,381
Записей в блоге: 1
27.07.2014, 10:53
Пытаюсь прицепить файл, что то не цепляется, говорит, что уже есть такой.
Попытка №2
Вложения
Тип файла: zip Подбор под сумму2.zip (51.2 Кб, 31 просмотров)
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
27.07.2014, 10:53

Выборка подмножества комбинаций без повторов из множества всех комбинаций перестановок
Собственно вопрос. Существует ли алгоритм нахождения без перебора уникальных комбинаций в сортированном множестве всех возможных...

Даны списки чисел, нужно вывести список всех возможных комбинаций чисел, составляющих эти списки
Даны списки чисел, нужно вывести список всех возможных комбинаций чисел, составляющих эти списки (элемент из списка 1, элемент из списка 2...

Найти количество комбинаций, при которых сумма чисел на двух бочонках окажется равна заданному числу
Здравствуйте, помогите пожалуйста с программой, начинающий). Один способ придумал простой, но нужен ещё один. Не знаю что можно ещё...

Сумма значений одного столбца
Надо подсчитать на какую сумму сделал заказ столик Хотелось бы, чтоб было так: нажимаю на запрос он открывает мне окно где надо ввести...

Сумма всех ячеек столбца
Добрый день, уважаемые форумчане. С VBA давно не сталкивался. Возник уж совсем глупый вопрос, как найти сумму элементов столбца в...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
46
Ответ Создать тему
Новые блоги и статьи
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ"
Adler 06.10.2026
Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .
ИИ не может найти нужный язык в списке
Supersumestria 05.10.2026
Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO
zorxor 05.10.2026
Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Jin X 06.09.2026
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru