Поиск по совпадению в VBA_EXCEL

09.09.2008, 05:40. **Показов** 6909. **Ответов** 5

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

Как организовать в Excel поиск по совпадению, как стандартном поиске Excel, а не по полному значению ячейки. У меня есть столбец таблицы 'Личные данные', в котором указываются имя, отчество и фамилия.Есть UserForm для поиска. Поиск ведется по значениям этого столбца, но проблема состоит в том, что для того, чтобы запись была найдена, нужно ввести в UserForm полное значение, т. е. имя , отчество, фамилия целиком.

@Serg_FSM · 09.09.2008, 13:04

Приветствую.
Если для поиска используется функция Find, то нужно присвоить параметру LookAt значение xlPart. Кажется, так.

10.09.2008, 03:44

Привет, SergFSM! Спасибо тебе за совет, но ты не мог бы выразить это всё в программе. Заранее тебе очень благодарна, Galinka.

10.09.2008, 07:02

А самой слабо?
В хелпе про Find все расписано, да еще с примером.

@Serg_FSM · 10.09.2008, 11:11

Приветствую.
Вот небольшой пример:

Visual Basic
1
2
3
4
5
6
7
8
Sub поиск()
Dim SearchRange As Range 'диапазон поиска
Dim SearchResult As Range 'результат поиска
Dim cLookAt 'совпадение (полное или частичное) со знячением ячейки
If frmFind.chkLookAt.Value Then cLookAt = xlWhole Else cLookAt = xlPart
Set SearchResult = SearchRange.Find(What:=frmFind.txtWhat.Text, After:=ActiveCell, LookAt:=cLookAt)
If Not SearchResult Is Nothing Then SearchResult.Activate Else MsgBox 'Искомое значение не найдено'
End Sub

На форме frmFind установлен TextBox txtWhat в который вводится искомое значение и CheckBox chkLookAt (если он отмечен то будут искаться ячейки с полным совпадением)

10.09.2008, 11:38

Спасибо огромное за программу. Теперь есть на чем основываться.

Новые блоги и статьи Все статьи Все блоги /
Доступность команды формы по условию Maks 07.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .	Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .

Galinka

	Поиск по совпадению в VBA_EXCEL 09.09.2008, 05:40. Показов 6909. Ответов 5 Метки нет (Все метки) Как организовать в Excel поиск по совпадению, как стандартном поиске Excel, а не по полному значению ячейки. У меня есть столбец таблицы 'Личные данные', в котором указываются имя, отчество и фамилия.Есть UserForm для поиска. Поиск ведется по значениям этого столбца, но проблема состоит в том, что для того, чтобы запись была найдена, нужно ввести в UserForm полное значение, т. е. имя , отчество, фамилия целиком.

@Serg_FSM 0 / 0 / 0 Регистрация: 23.07.2008 Сообщений: 47
	09.09.2008, 13:04
	Приветствую. Если для поиска используется функция Find, то нужно присвоить параметру LookAt значение xlPart. Кажется, так. 0

Galinka
	10.09.2008, 03:44
	Привет, SergFSM! Спасибо тебе за совет, но ты не мог бы выразить это всё в программе. Заранее тебе очень благодарна, Galinka.

Tim
	10.09.2008, 07:02
	А самой слабо? В хелпе про Find все расписано, да еще с примером.

Galinka
	10.09.2008, 11:38
	Спасибо огромное за программу. Теперь есть на чем основываться.