ReSQL.ru
     
powered by simpleCommunicator - 2.0.38     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Быстрый поиск в двумерном массиве vba
25 сообщений из 66, страница 1 из 3
  1  все
Быстрый поиск в двумерном массиве vba
    #39565823
BlackeAngel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BlackeAngel
Гость
Есть у кого-нибудь такая функция? Только для текстовых массивов?
...
Рейтинг: 0 / 0
07.12.2017, 13:47
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39565936
Казанский
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Казанский
Гость
BlackeAngel,
поиск нужен в определенном столбце/строке или по всему массиву?
Массив отсортирован? (если да, поиск можно сделать на порядок быстрее)
Откуда берется массив? Если он считывается с листа Excel или из таблицы Word, можно задействовать методы Find для документа.
...
Рейтинг: 0 / 0
07.12.2017, 15:10
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39565988
BlackeAngel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BlackeAngel
Гость
Казанский,
Массив отсортирован, по одному столбцу.
...
Рейтинг: 0 / 0
07.12.2017, 15:50
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39565989
BlackeAngel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BlackeAngel
Гость
КазанскийОткуда берется массив? Если он считывается с листа Excel или из таблицы Word, можно задействовать методы Find для документа.
Берется из recordset'а и кладется в массив.
...
Рейтинг: 0 / 0
07.12.2017, 15:51
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566205
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
BlackeAngel,

Код: vbnet
1.
2.
3.
Dim ar() As Variant
ar = Range("A1:A10")
MsgBox WorksheetFunction.Match("SomeValue", ar, 0)
...
Рейтинг: 0 / 0
07.12.2017, 19:54
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566208
BlackeAngel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BlackeAngel
Гость
big-duke,
Это к чему?
...
Рейтинг: 0 / 0
07.12.2017, 19:56
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566209
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
для двумерного
Код: vbnet
1.
2.
3.
 Dim ar() As Variant
 ar = Range("A1:B10")
 MsgBox WorksheetFunction.VLookup("A", ar, 2, 0)
...
Рейтинг: 0 / 0
07.12.2017, 19:58
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566210
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
BlackeAngelbig-duke,
Это к чему?
Это к тому как искать в массиве.
...
Рейтинг: 0 / 0
07.12.2017, 19:58
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566212
BlackeAngel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BlackeAngel
Гость
big-duke,
У меня уже в массиве, массив не берется с листа.
...
Рейтинг: 0 / 0
07.12.2017, 19:59
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566214
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
BlackeAngelbig-duke,
У меня уже в массиве, массив не берется с листа.
Это для примера.
Используйте сразу ваш массив и WorksheetFunction.VLookup
...
Рейтинг: 0 / 0
07.12.2017, 20:03
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566221
BlackeAngel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BlackeAngel
Гость
big-duke,
На сколько это быстрее перебора? И на сколько это быстрее бинарного поиска? Или поиска половинного деления?
...
Рейтинг: 0 / 0
07.12.2017, 20:09
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566229
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
BlackeAngel,

Понятия не имею.

Вы спросили про функцию для поиска в массиве.
...
Рейтинг: 0 / 0
07.12.2017, 20:26
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566231
BlackeAngel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BlackeAngel
Гость
big-duke, я просил быструю
...
Рейтинг: 0 / 0
07.12.2017, 20:27
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566234
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
BlackeAngel,

У вас есть доказательства того, что WorksheetFunction.VLookup - медленная функция ?
Что мешает взять и сравнить ?
...
Рейтинг: 0 / 0
07.12.2017, 20:30
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566236
BlackeAngel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BlackeAngel
Гость
big-duke,
Вот завтра и сравню на 3млн записях
...
Рейтинг: 0 / 0
07.12.2017, 20:35
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566237
BlackeAngel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BlackeAngel
Гость
А пока жду ещё предложения...
...
Рейтинг: 0 / 0
07.12.2017, 20:36
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566241
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
BlackeAngel,

1М записей ~ 400ms
...
Рейтинг: 0 / 0
07.12.2017, 20:41
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566244
BlackeAngel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BlackeAngel
Гость
big-duke,
Тогда мои данные будет этот метод обрабатывать 1,4E11ms... Что то не быстро...
...
Рейтинг: 0 / 0
07.12.2017, 20:51
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566245
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
BlackeAngel,

А какой у вас лимит времени на обработку ?
...
Рейтинг: 0 / 0
07.12.2017, 20:52
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566246
BlackeAngel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BlackeAngel
Гость
big-duke, час
...
Рейтинг: 0 / 0
07.12.2017, 20:53
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566249
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
BlackeAngel,

тогда почему поиск в 1 миллионе строк за 400 миллисекунд это медленно ?
Сколько операций поиска нужно выполнить ?
...
Рейтинг: 0 / 0
07.12.2017, 20:56
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566250
BlackeAngel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BlackeAngel
Гость
big-duke,
(500000строк*70000раз)*4раза.
Миллионы для того чтоб удобней время считать.
...
Рейтинг: 0 / 0
07.12.2017, 21:01
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566253
BlackeAngel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BlackeAngel
Гость
Могу только добавить что перебором массива это заняло 7 часов.
...
Рейтинг: 0 / 0
07.12.2017, 21:13
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566280
Bobgos
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Bobgos
Гость
BlackeAngel,
Есть уверенность в том, что (500000строк*7000раз)*4раза это оптимальное решение вашей задачи. Вдруг достаточно будет 500000строк*1раз?
...
Рейтинг: 0 / 0
07.12.2017, 22:35
| Ответить | Цитировать | Написать  
Быстрый поиск в двумерном массиве vba
    #39566281
Казанский
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Казанский
Гость
BlackeAngel,
если поиск идет по отсортированному столбцу, можно использовать WorksheetFunction.VLookup или WorksheetFunction.Match с последним аргументом =1, это "интервальный" поиск, т.е. методом половинного деления или еще более оптимизированный. В случае миллионного массива это будет быстрее на 2-3 ПОРЯДКА. Правда, надо еще проверить, что найденное значение равно искомому:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Dim ar() As Variant, col() As Variant, n As Long, x, y
  ar = '... массив
  col = WorksheetFunction.Index(ar, 0, 1) 'выделить 1-й столбец массива
' в цикле
    x = '... искомое значение
    n = WorksheetFunction.Match(x, col, 1) 'интервальный поиск
    If col(n) = x Then 'найдено точное совпадение
      y = ar(n, 3) 'взять соотв. значение из другого столбца
    Else
      'действия, если не найдено
    End If
'конец цикла
...
Рейтинг: 0 / 0
07.12.2017, 22:38
| Ответить | Цитировать | Написать  
25 сообщений из 66, страница 1 из 3
  1  все
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Быстрый поиск в двумерном массиве vba
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=39566229&tid=2172460]:
 0ms
get settings:
 7ms
get forum list:
 15ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 34ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 74ms
get tp. blocked users:
 3ms
others: 283ms
total:  440ms
созд. / загр.: 440ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]