Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Сфера Microsoft » Microsoft Office (Word, Excel, Outlook и т.д.) » 2010 - Поиск в выделенном (заданном) диапазоне

Ответить
Настройки темы
2010 - Поиск в выделенном (заданном) диапазоне

Аватара для blackeangel

Старожил


Сообщения: 329
Благодарности: 3

Профиль | Отправить PM | Цитировать


Изменения
Автор: blackeangel
Дата: 10-05-2016
Всем привет. Вопрос простой.
Как вот это
Код: Выделить весь код
Columns("B:B").Select
    Selection.Find(What:=m1, After:=ActiveCell, LookIn:=xlValues, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate
запихать в вот это
Код: Выделить весь код
Set z = s.Worksheets(1).Cells.Find(What:=m1, LookIn:=xlValues, LookAt:=xlPart, SearchOrder:=xlByRows)
Т.к. искать надо только в определенном столбце, а не по всем у листу.
Это делается для ускорения поиска.
Если есть, конечно, способ ускорить до мгновения ока, то буду только рад.

Отправлено: 16:12, 10-05-2016

 

Ветеран


Сообщения: 27449
Благодарности: 8087

Профиль | Отправить PM | Цитировать


Так и «запихать»:
Код: Выделить весь код
s.Worksheets(1).Columns("B:B").Find(What:=m1, LookIn:=xlValues, LookAt:=xlPart, SearchOrder:=xlByRows)
Цитата blackeangel:
Это делается для ускорения поиска.
Если есть, конечно, способ ускорить до мгновения ока, то буду только рад. »
Искать не во всём столбце, а только в его значимой части. Например, используя его пересечение с заполненной частью Рабочего листа:
Код: Выделить весь код
 With s.Worksheets(1)
    Set z = Intersect(.Columns("B:B"), .UsedRange).Find(What:=m1, LookIn:=xlValues, LookAt:=xlPart, SearchOrder:=xlByRows)
End With
Это сообщение посчитали полезным следующие участники:

Отправлено: 18:43, 10-05-2016 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.



Компьютерный форум OSzone.net » Сфера Microsoft » Microsoft Office (Word, Excel, Outlook и т.д.) » 2010 - Поиск в выделенном (заданном) диапазоне

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
2012 R2 - PhpMyAdmin на выделенном сервере sahsa_1987 Windows Server 2012/2012 R2 0 29-10-2014 09:49
Помощь со сборкой игрового ПК в диапазоне 50-100к. рублей. razdornv Выбор отдельных компонентов компьютера и конфигурации в целом 8 12-07-2014 19:53
Не срабатывает MouseClick на выделенном сервере Habetdin AutoIt 1 01-08-2012 13:06
Прочее - [решено] Расчет адресов в диапазоне timrx Сетевые технологии 8 30-05-2011 09:32
Выделение полосы в выделенном канале на определенный порт ant2004 Сетевые технологии 3 15-09-2004 09:42




 
Переход