Сравнение текстовой строки с заданным словарём

@anastasia1986 · Регистрация: 08.12.2017

Студворк — интернет-сервис помощи студентам

Добрый день, есть массив слов, с которым нужно сравнить выгруженные наименования товаров. Для 1 слова код написан, а как пройтись по всем словам из словаря, по типу: проверил слово "Фрутоняня", переходи к проверке "коблево" и т.п., не могу придумать, помогите, пожалуйста, привожу код:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Sub tm()
Application.ScreenUpdating = False
a = "ФрутоНяня"
For i = 2 To 689 'строки
If InStr(1, Cells(i, 1).Value, a) <> 0 Then
Cells(i, 6).Value = a
 
End If
Next
Application.ScreenUpdating = True
End Sub

@Святой НякаЛайк · 28.11.2021, 02:32

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

ScreenUpdate всегда False

Когда работаем в цикле по ячейкам - то да, а если все данные взяты в массив и обрабатываются в коде ВБА, то это ничего не даст, так как будет только по одному обновлению экрана на каждый столбец - в момент вставки данных на лист, то есть в данном случае всего 5 обновлений экрана, для экселя это как 5 формул в ячейках пересчитать. Вставка массива в ячейки происходит очень быстро, даже если речь про весь столбец на 1 048 576 ячеек
P. S. Всё, что я знаю и умею в VBA - найдено на этом форуме, за что огромная благодарность всем моим учителям! Спрашивайте и учитесь на здоровье! Местные умельцы решили все возможные задачи, включая создание видеоигры в листе Экселя! Только задачу многопоточности в VBA не решили (но можно сказать, что почти решили), а это вообще 'взлом матрицы'

@Zeag · 28.11.2021, 14:10

А как решили? )) Я тоже этим интересовался, но MS на сайте пишет, что VBA идет в однопоточном режиме. Оно и понятно, средств распараллеливания в языке нет. Гонки и блокировки как учитывать?

@Святой НякаЛайк · 29.11.2021, 02:05

На сколько помню, костыльные решения были, как то: вызов в коде стороннего скрипта (из макроса открываем jscript, кидаем ему данные - и пусть обрабатывает в своём обработчике, пока наш код делает что-то другое), и подключением сторонних библиотек - если написал *.dll - ку с многопоточными способностями, её можно подключить и вызывать в коде. Потому и пишу "Почти решили"

. Хотя я отстал от темы, может уже и что-то новое есть )

Новые блоги и статьи Все статьи Все блоги /
FPS контроллер с анимированными Y-Bot и 3D-звуком miniaudio (Box3D, Recast, BehaviorTree.CPP, ozz-animation, ImGui, OpenGL и SDL3) 8Observer8 18.10.2026 Содержание блога \| English Version Полное мультиплатформенное руководство по стартовому проекту с FPS-контроллером игрока, анимированными роботами Y-Bot с 4-слойным блендингом, 3D-физикой Box3D,. . .	Локальный http сервер Argus19 17.10.2026 Локальный http сервер На работе, на двух локальных компьютерах круглосуточно работают программы опроса приборов с записью в книги Excel,которые раз в сутки записываются на сервер компании. Т. к. . . .	Копировать Windows на новый диск на UEFI damix 17.10.2026 https:/ / uriesk. wordpress. com/ 2016/ 11/ 01/ move-window-10-to-ssd-on-a-uefi-dualboot-system-with-basic-linux-tools/ TL DR Вставляем диск, а старый подключаем через переходник, грузимся с лайва. . .	ИИ не может найти нужный язык в списке 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. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .

@Zeag 860 / 510 / 187 Регистрация: 09.03.2009 Сообщений: 1,732
	28.11.2021, 14:10
	А как решили? )) Я тоже этим интересовался, но MS на сайте пишет, что VBA идет в однопоточном режиме. Оно и понятно, средств распараллеливания в языке нет. Гонки и блокировки как учитывать? 0

@Святой НякаЛайк 655 / 247 / 89 Регистрация: 28.10.2015 Сообщений: 526
	29.11.2021, 02:05
	На сколько помню, костыльные решения были, как то: вызов в коде стороннего скрипта (из макроса открываем jscript, кидаем ему данные - и пусть обрабатывает в своём обработчике, пока наш код делает что-то другое), и подключением сторонних библиотек - если написал *.dll - ку с многопоточными способностями, её можно подключить и вызывать в коде. Потому и пишу "Почти решили" . Хотя я отстал от темы, может уже и что-то новое есть ) 0