И вправду. Вот балда, не  понял что каждый раз начало цикла меняется. А показалось, что только один раз меняется. Всем спасибо!  

Всем спасибо! Как Менделееву почти во сне приснилось.
Все решается условием a<b<c<d....

Можете по-подробнее рассказать?

Спасибо! Но не совсем то. Нужно, чтоб не результаты были уникальны, нужно, чтоб набор переменных был уникален. 1+2+9+8 =20 и 3+4+6+7=20.  Мне мешает, то что при прогоне циклов всплывает
10+11+12+13=46
10+11+13+12=46
10+12+11+13
10+12+13+11
10+13+11+12
10+13+12+11
11+10+12+13
11+10+13+12
11+12+10+13
11+12+13+10
11+13+12+10
и т.д.
Всего 16 . От перестановки мест слагаемых сумма не меняется. Но перебирая циклом вместо одного подсчёта, делается 16. И массив с результатами переполнен.

А над данной проблемой думал думал и надумал. При каждой итерации сохранять переменные в виде текста в одномерный массив. И при следующей итерации проверять нет ли в массиве текущих параметров.

Простите если обидел. Спасибо за помощь!  Голова кругом. Думал в личном кабинете найду свои темы, а там они не отображаются, я уж думал потерял их.

Всем спасибо!

Всем спасибо!

тссссс)))))))

Перебором. В подобных задачах производится в 16 раз лишних подсчётов (4*4=16), и соответственно в 16 раз раздувается массив с результатами. А если 5 или 6 параметров(((

Не получится ли в цикле проверить переменные на то, было ли сочитание до этого?)

я так понимаю всё равно будут миллион комбинаций начиная с 5 6 7 8, 5 6 8 7, 5 7 6 8 и тд и до 90 91 92  93, 90 91 93 92, 90 92 91 93
как раз и хочу исключить повторяющиеся вычисления и результаты.

Добрый день!
Помогите пожалуйста.
есть формула a+b+c+d=m
нужно найти m для значений a,b,c,d от 1 до 100.значения в уравнении должны быть унимальными, не повторяться. Решил методом перебора попробовать.
часть кода:

Как не считать m если две переменные будут равны( например 1 2 3 3) я понимаю.
Но я не понимаю как избежать повторения значений типа : 1 2 3 4 и 1 2 4 3, и 1 3 2 4 и.т.д.
Тоесть надо один раз посчитать такую комбинацию и далее пропускать.

помогите пожалуйста

огромное СПАСИБО за помощь! Работает

Всем всего доброго!
Имеем массив с текстовыми строками(stroki(u)), надо понять имеют ли строки числа из переменных a и b.
код:
for i=1 to ubound(stroki)
if stroki(i) like "*"+a+"*" and stroki(i) like "*"+b+"*" then
......

Помогите пожалуйста подправить, чтоб искалось число полностью. Например число 5(отделенную от текста пробелами), а не цифру 5 которая входит в другое число например 654.

А не подойдет ли оператор like?
например
for i=1 to 1000
if массив строк(i) like "a" and массив строк(i) like "b" and массив строк(i) like "c" and массив строк(i) like "d" and массив строк(i) like "f"  then

Прикрепил к первоначальному вопросу

Второй вариант подойдёт? Ведь числа не по порядку.

Добрый день!

Имеется текстовый столбец в excel с количеством строк примерно 1000. Каждая строка столбца состоит из 30ти рандомных чисел от 1 до 99 включительно разделенных пробелом. Числа не по порядку и не повторяются.

Для удобства и быстродействия вычислений скопировал столбец в массив спомощью макроса.

Помогите пожалуйста составить запрос в vba на подсчёт строк в которых одновременно содержатся числа a, b, c, d, e (например a=6,b=34,c=75,d=43,e=88) вводимые пользователем.

Надеюсь понятно объяснил, если , что подкорректирую вопрос.

Проблема и в том, что строки в массиве текстовые получаются, а поиск по числам.

А как отписать если на другом форуме разместил?

Добрый день!
Прошу помощи.

Имеется база данных в excel из двух столбцов. 1й - номер строки, 2ой - содержит 30 чисел от 1 до 90. числа в строке не повторяются.
Как определить какие 3,4,5,6... числа совпадают в максимальном количестве строк?

Пример(кол-во строк больше 1000)

Строка 1: 28 39 51 72 89 5 12 23 32 67 18 45 59 76 87 8 36 42 68 90 13 24 43 53 71 15 29 34 63 77 Строка 2: 15 33 43 53 74 27 31 44 67 82 5 20 69 77 88 9 19 57 65 86 21 46 56 62 71 12 37 48 79 89 Строка 3: 2 42 64 75 83 9 14 32 61 85 13 27 31 40 59 6 29 49 79 90 7 22 35 56 81 16 41 50 63 77 Строка 4: 14 23 40 73 88 8 52 64 72 87 27 32 47 51 69 18 26 57 66 75 11 22 39 45 86 7 35 46 76 83 Строка 5: 4 11 30 78 90 7 25 43 67 85 17 45 53 60 70 16 26 38 50 71 20 31 49 61 86 6 12 54 66 79 Строка 6: 7 33 45 62 90 24 31 55 71 88 1 15 29 68 70 18 27 38 67 83 6 26 48 51 64 11 37 46 50 77 Строка 7: 18 23 34 41 90 9 15 24 50 69 6 32 60 71 85 5 10 22 56 63 1 26 39 49 83 44 58 67 75 82 Строка 8: 6 29 32 44 66 36 49 52 71 85 12 53 64 73 86 26 35 46 55 88 5 13 23 51 74 7 19 48 65 90 Строка 9: 6 28 37 50 61 4 38 51 78 80 11 26 41 67 85 2 44 59 79 90 3 16 24 32 82 30 45 53 60 74 Строка 10: 19 49 69 75 80 7 10 25 33 82 20 32 44 59 73 23 31 57 61 70 2 18 48 58 85 5 14 37 65 84 Строка 11: 4 35 40 57 60 2 11 29 42 87 13 25 37 76 86 17 46 58 67 80 28 31 41 70 84 3 15 38 54 72 Строка 12: 3 17 20 42 79 15 25 52 65 88 33 59 68 77 87 7 24 31 48 89 6 10 66 71 82 28 30 41 53 62 Строка 13: 26 31 50 60 88 15 39 40 54 65 1 29 49 73 80 2 35 66 76 86 14 28 42 58 72 9 17 32 45 85 Строка 14: 9 15 45 66 87 1 16 27 35 57 38 47 55 71 88 17 32 50 60 70 7 28 48 52 83 22 31 40 64 72 Строка 15: 6 19 32 52 86 12 22 56 66 77 7 36 45 78 84 15 25 69 70 90 9 17 30 42 57 37 53 62 75 80 Строка 16: 9 17 26 37 65 23 46 59 75 88 3 35 55 71 80 14 28 30 47 57 6 27 42 79 81 7 11 39 68 85 Строка 17: 10 20 34 54 68 11 28 39 78 80 4 47 52 60 90 14 53 69 77 81 6 15 31 56 87 22 37 40 62 76 Строка 18: 2 16 53 68 74 25 38 43 79 82 6 30 41 54 62 9 26 49 78 86 8 32 56 60 87 11 44 52 66 73 Строка 19: 3 25 33 71 80 1 21 41 51 74 12 34 59 64 85 10 24 46 60 70 8 31 58 77 86 11 38 47 66 83 Строка 20: 25 45 51 65 90 21 37 40 59 66 1 11 39 71 85 2 14 36 62 83 8 10 43 73 84 22 35 41 52 79

Можно посчитать каких чисел больше. Но нужно именно, чтоб найти совокупность из нескольких(например какие 3, или 4, или 5, или 6 числел) чисел которые входят в максимальное число строк

Создал тему еще и тут: http://www.programmersforum.ru/showthread.php?t=314141