Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 24.03.2010, 15:31   #1
sasha_prof
Форумчанин
 
Регистрация: 06.01.2010
Сообщений: 292
По умолчанию Поиск в листе

Как макросом сделать поиск в листе по нескольким буквам, и чтоб выдавало все похожие варианты. Искать по типу Ctrl+F
sasha_prof вне форума Ответить с цитированием
Старый 24.03.2010, 15:35   #2
Dophin
Форумчанин
 
Аватар для Dophin
 
Регистрация: 13.01.2010
Сообщений: 410
По умолчанию

в общем случае range.find

нужна конкретика - выкладывайте пример)
Dophin вне форума Ответить с цитированием
Старый 24.03.2010, 16:26   #3
sasha_prof
Форумчанин
 
Регистрация: 06.01.2010
Сообщений: 292
По умолчанию

Вложил файлик. На странице Manager есть поле "Поиск клиента:", нужно чтоб взяло с него информацию и пробежалось по "Список" и выдало в "Резултат поиска:" информацию как я указал в примере.
Вложения
Тип файла: rar Клиенты.rar (6.2 Кб, 13 просмотров)
sasha_prof вне форума Ответить с цитированием
Старый 24.03.2010, 17:06   #4
sasha_prof
Форумчанин
 
Регистрация: 06.01.2010
Сообщений: 292
По умолчанию

Ребята очень надо, помогите...
sasha_prof вне форума Ответить с цитированием
Старый 24.03.2010, 17:41   #5
Dophin
Форумчанин
 
Аватар для Dophin
 
Регистрация: 13.01.2010
Сообщений: 410
По умолчанию

вот посмотрите
Вложения
Тип файла: rar Клиенты.rar (12.3 Кб, 26 просмотров)
Dophin вне форума Ответить с цитированием
Старый 24.03.2010, 18:25   #6
sasha_prof
Форумчанин
 
Регистрация: 06.01.2010
Сообщений: 292
По умолчанию

Цитата:
Сообщение от Dophin Посмотреть сообщение
вот посмотрите
Ищет все чудесно только не могу понять вот этих обьявлений
Dim i As Long
Dim il1 As Long, il2 As Long
Dim sh1 As Worksheet
Dim sh2 As Worksheet
Dim f As String
Dim k As Long

и как оно вот это определяет
il1 = sh1.Cells(Rows.Count, 7).End(xlUp).Row
il2 = sh2.Cells(Rows.Count, 2).End(xlUp).Row


Расскажите плиз
sasha_prof вне форума Ответить с цитированием
Старый 24.03.2010, 19:20   #7
Dophin
Форумчанин
 
Аватар для Dophin
 
Регистрация: 13.01.2010
Сообщений: 410
По умолчанию

ну что такое объявление переменных Вам в принципе известно? если нет - читайте справку. это оно и есть.

il1 = sh1.Cells(Rows.Count, 7).End(xlUp).Row

ищет последнюю заполненную строку в 7 столбце.

sh1.Cells(Rows.Count, 7).End(xlUp) - если грубо: курсор становится в самую последнюю строку(Rows.Count) столбца 7 (7), потом нажимается комбинация клавиш ctrl+вверх. Выделяется последняя заполненная ячейка.
.Row = возвращает номер строки этой ячейки
Dophin вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Осуществить поиск записей по двум символьным полям. Найденные записи отобразить на втором листе мария2507 Microsoft Office Excel 11 17.01.2010 15:36
Множественный поиск на листе. _KA_ Microsoft Office Excel 3 28.10.2009 23:07
ячейка на одном листе, в которую необходимо подставлять данные из столбца, находящегося на другом листе Ирина Водолагина Microsoft Office Excel 4 04.03.2009 23:38
Поиск в VBA Excel на листе luxery Microsoft Office Excel 1 10.11.2008 08:38
Поиск диаграммы на листе maxic Microsoft Office Excel 1 29.10.2008 17:05