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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 17.01.2011, 11:47   #1
Jnas
Пользователь
 
Регистрация: 17.01.2011
Сообщений: 13
По умолчанию Поиск по формуле

Добрый день уважаемые форумчанины!
в инете не нашел ответа на свой вопрос, в VBA не силен , поэтому прошу Вашей помощи!

Как можно организовать поиск по формуле в диапазоне, при нахождение копирование данные ячейки, к примеру:
ищем *E*345* в столбце B1:B10, при совпадение вставка значение ячейки
Jnas вне форума Ответить с цитированием
Старый 17.01.2011, 11:54   #2
vikttur
Участник клуба
 
Регистрация: 16.05.2010
Сообщений: 1,249
По умолчанию

Так все-таки формула нужна (в названии темы) или VBA ("в VBA не силен")?
Желателен пример.
vikttur вне форума Ответить с цитированием
Старый 17.01.2011, 12:22   #3
Jnas
Пользователь
 
Регистрация: 17.01.2011
Сообщений: 13
По умолчанию

Если есть такая формула то формула,
Если не существует такой формуле хоть VBA.
Тема называется поиск по формуле, а не формула для поиска
то есть надо чтоб искала по формуле к примеру *па*45* , где * - любые символы
Или даже еще лучше поиск по формуле *A1*A2*, где A1 и A2 значение ячейки.
на всякий пример прикрепляю
Вложения
Тип файла: rar poisk.rar (4.8 Кб, 11 просмотров)
Jnas вне форума Ответить с цитированием
Старый 17.01.2011, 12:22   #4
ZORRO2005
Форумчанин
 
Аватар для ZORRO2005
 
Регистрация: 26.11.2006
Сообщений: 584
По умолчанию

CTRL+F
Найти:*E*345* --> Найти все
Переходим вниз окна и нажимаем CTRL+A
Закрываем окно
CTRL+C
Вставляем значения

После выложенного примера ничего не понятно.
Пользуйтесь фильтром.

Последний раз редактировалось ZORRO2005; 17.01.2011 в 12:30.
ZORRO2005 вне форума Ответить с цитированием
Старый 17.01.2011, 12:34   #5
Jnas
Пользователь
 
Регистрация: 17.01.2011
Сообщений: 13
По умолчанию

Цитата:
Сообщение от ZORRO2005 Посмотреть сообщение
CTRL+F
Найти:*E*345* --> Найти все
Переходим вниз окна и нажимаем CTRL+A
Закрываем окно
CTRL+C
Вставляем значения

После выложенного примера ничего не понятно.
Пользуйтесь фильтром.
Мне надо это автоматизировать, поз. слишком много требуется искать, одним словом как в примере
Jnas вне форума Ответить с цитированием
Старый 17.01.2011, 14:33   #6
nilem
Форумчанин
 
Регистрация: 25.04.2010
Сообщений: 616
По умолчанию

Так пойдет?
Вложения
Тип файла: zip poisk.zip (13.1 Кб, 12 просмотров)
nilem вне форума Ответить с цитированием
Старый 17.01.2011, 14:51   #7
Jnas
Пользователь
 
Регистрация: 17.01.2011
Сообщений: 13
По умолчанию

Цитата:
Сообщение от nilem Посмотреть сообщение
Так пойдет?
Спасибо за ответ, думал уже никто не ответит, но из-за того что мне надо перебрать не по одному поиску такое не совсем годится.

Пока искал что да как успел чуток разобраться,
путем записей и редактирования макросов создал почти что то похожее, но возник второй вопрос, а можно ли как бы создать новую формулу для поиска по определенной форме?
то есть вот мой макрос:
"Sub ИЩУПОФОР()

Columns("C:C").Select
Selection.Find(What:=Range("A1"), After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Select
Selection.Copy
Range("M6").Select
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub"

теперь когда в ячейке A1 находится *HG*7 (к примеру) то в диапазоне C:C он ищет по шапке *HG*7, где *-любой символ , и вывод это всё в ячейку M6,
А можно ли сделать чтоб допустим я писал в excele в поле ввода значении и формул,
формулу =ИЩУПОФОР(x,y), где x-диапазон, y-маска ?
то есть как бы создать новую формулу.
Jnas вне форума Ответить с цитированием
Старый 17.01.2011, 15:17   #8
nilem
Форумчанин
 
Регистрация: 25.04.2010
Сообщений: 616
По умолчанию

Например, в А1 - 7410, в А2 - .2
Код:
=ВПР(A1&"*"&A2;C2:C16;1;ЛОЖЬ)
вернет 7410AE01101.2
nilem вне форума Ответить с цитированием
Старый 17.01.2011, 15:36   #9
Jnas
Пользователь
 
Регистрация: 17.01.2011
Сообщений: 13
По умолчанию

Спасибо Вам большоЕ, ОЧЕНЬ ПОМОГЛИ!!!

Последний раз редактировалось Jnas; 17.01.2011 в 16:09.
Jnas вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Подскажите по формуле Marshall150 Microsoft Office Excel 6 08.11.2009 17:52
+ и - в формуле lubov09 Microsoft Office Excel 11 31.10.2009 18:18
вопрос по формуле x3m Microsoft Office Excel 2 01.10.2009 18:23
Вычисления по формуле random7 Паскаль, Turbo Pascal, PascalABC.NET 3 18.09.2009 12:44
Вопрос по формуле Philipok Microsoft Office Excel 4 09.10.2008 10:10