Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.73/11: Рейтинг темы: голосов - 11, средняя оценка - 4.73
0 / 0 / 0
Регистрация: 29.10.2013
Сообщений: 71

Посчитать уникальные значения в двумерном массиве, при условии, что данные связаны

05.02.2014, 09:35. Показов 2001. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем Добрый день.
Есть двумерный массив (296, 5), в столбцах с 0 по 2 существует 74 уникальных значения, но каждое уникальное значение имеет 3 дубля.
В двух последних столбцах уникальных значений 16.
Проблема в том, что значения уникальны только если смотреть всю строку в диапазоне с 0 столбца до 2, и в диапазоне с 3 столбца по 4.

Как уникальность можно посчитать циклом, при условии, что данные связаны?
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
05.02.2014, 09:35
Ответы с готовыми решениями:

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

Запрос: Добавить запись при условии, что такого значения не было
Есть список предметов в таблице ИГРУШКИ id | toys Запрос должен добавить новый предмет "мяч", но только при условии, что...

Найти матрицу U, при условии, что значения матрицы U целые и находятся в диапазоне [0;5].
Добрый вечер! Помогите пожалуйста решить задачку. Дана матрица А, M0, Mf и надо найти матрицу U, при условии, что значения матрицы U целые...

2
6997 / 2895 / 555
Регистрация: 19.10.2012
Сообщений: 8,803
05.02.2014, 11:19
Кто-то понял задачу? Я не понял...
0
0 / 0 / 0
Регистрация: 29.10.2013
Сообщений: 71
05.02.2014, 12:00  [ТС]
Прошу прощения, наверное в связи с тем, что VBA я изучаю совсем недавно не могу связать свою задачу с возможностями VBA, так как не знаю всех возможностей. Суть была в том чтобы перебрать строки двумерного массива только до 3его столбца из 5ти и посчитать уникальные значения в этих строках.
Решил проблему самостоятельно.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
For i = 1 To UBound(iArrData)
 
iStatSwitchFIO = 0
 
 
    For j = 0 To UBound(iArrSvod, 1)
        If Len(iArrSvod(j, 0)) = 0 Then GoTo switch1
        If iArrSvod(j, 0) = iArrData(i, 0) And iArrSvod(j, 1) = iArrData(i, 1) And iArrSvod(j, 2) = iArrData(i, 2) Then
            iStatSwitchFIO = iStatSwitchFIO + 1
        End If
    Next
switch1:
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
05.02.2014, 12:00
Помогаю со студенческими работами здесь

Как заполнять таблицы в Windows Forms при условии, что данные нужно вызывать запросом (SQL)?
Какой самый простой способ заполнения таблиц формы при условии, что данные идут в ответ на SQL - запросы и являются слиянием нескольких...

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

Можно ли вернуть функцией два значения при условии что она будет вещественного типа?
Вот само задание...уже пол часа думаю есть ли такая возможность или я что то не так понимаю.Написать программу с реализацией в виде вызова...

Уникальные значения в одномерном массиве
Создать массив из 25 элементов, (зандовским путем), записать в него из оригинального массива - только уникальные значения. Если они...

Определить уникальные значения в массиве и их количество
Помогите закончить код,вывожу уникальные элементы,все получается,но что дописать,чтобы выводилось и их количество.Заранее спасибо...:wall: ...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Access
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .
Фото: Daniel Greenwood
kumehtar 13.11.2025
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru