Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Поиск числовых значений
 
#1
17.07.2017 08:00:49
Имеется большая таблица порядка 7000 строк. В одной ячейке может быть указано от 1 до 15 числовых значений. Проблема в том, что мне нужно найти полное и точное совпадение числа через поиск.
Например, мне нужно найти число "7", ищу через поиск Ctrl+F, но проблема в том, что в ячейках могут содержаться числа "7А", "7/1" и поиск выдает эти ячейки, частично совпадающие с заданным условием поиска. Помогите, пожалуйста, решить мою проблему, чтобы показывались ячейки, содержащие только ячейки с числом "7".
 
 
 
#2
17.07.2017 08:25:05
А вы пробовали при поиске зайти в options-> и установить галочку на match entire cell contents
А для Вашего случая сначала бы выполнил функцию текст по столбцам, и потом поиск - пара минут и все готово!
Изменено: skais675 - 17.07.2017 08:29:45
Мой канал
 
 
 
#3
17.07.2017 08:26:43
Формула массива для поиска 1
=ЕЧИСЛО(ПОИСКПОЗ(1;--СЖПРОБЕЛЫ(ПСТР(ПОДСТАВИТЬ(E3;",";ПОВТОР(" ";100));(СТРОКА($1:$20)-1)*100+1;100));0))
Изменено: Bema - 17.07.2017 08:29:43
Если в мире всё бессмысленно, — сказала Алиса, — что мешает выдумать какой-нибудь смысл? ©Льюис Кэрролл
 
 
 
#4
17.07.2017 08:48:10
Цитата
skais675 написал:
А вы пробовали при поиске зайти в options-> и установить галочку на match entire cell contents
А для Вашего случая сначала бы выполнил функцию текст по столбцам, и потом поиск - пара минут и все готово!
По первой части сообщения не понял, можно поподробнее пожалуйста расписать?
По второй части -пробовал этот способ, но проблема в том, что он вытаскивает не все значения с некоторых ячеек...
Цитата
Bema написал:
Формула массива для поиска 1
=ЕЧИСЛО(ПОИСКПОЗ(1;--СЖПРОБЕЛЫ(ПСТР(ПОДСТАВИТЬ(E3;",";ПОВТОР(" ";100));(СТРОКА($1:$20)-1)*100+1;100));0))
Спасибо огромное, буду пытаться понять и разобраться..особенно в цифре 100
 
 
 
#5
17.07.2017 09:04:27
Пожалуйста, но я бы воспользовался советом от skais675
Цитата
сначала бы выполнил функцию текст по столбцам, и потом поиск - пара минут и все готово!
Если в мире всё бессмысленно, — сказала Алиса, — что мешает выдумать какой-нибудь смысл? ©Льюис Кэрролл
 
 
 
#6
17.07.2017 09:13:56
в ячейку Е1 искомую цифру или цифру и букву
Код
=ЕСЛИ(И(ЕЧИСЛО(ЕСЛИОШИБКА(ПОИСК($E$1;E3);""));ИЛИ(ЕСЛИОШИБКА(ПСТР(E3;ЕСЛИОШИБКА(ПОИСК($E$1;E3);"")-1;1);"")="";ЕСЛИОШИБКА(ПСТР(E3;ЕСЛИОШИБКА(ПОИСК($E$1;E3);"")-1;1);"")=",");ИЛИ(ЕСЛИОШИБКА(ПСТР(E3;ЕСЛИОШИБКА(ПОИСК($E$1;E3);"")+ДЛСТР($E$1);1);"")="";ЕСЛИОШИБКА(ПСТР(E3;ЕСЛИОШИБКА(ПОИСК($E$1;E3);"")+ДЛСТР($E$1);1);"")=","));$E$1;"")
Изменено: copper-top - 17.07.2017 14:57:36
 
 
 
#7
17.07.2017 09:14:25
Вот процедура
1.спрашивает где искать
2. спрашивает что искать
3. если нашлось - цвет ячейки станет зеленый

Код
Sub find_in_cell()
Dim rng As Range
Dim WhatUw As String
    Set rng = Application.InputBox("Диапазон", "Где искать", Type:=8)
WhatUw = Application.InputBox("Что искать", "Поиск")
arr = rng



For i = 1 To UBound(arr)
        Dim strArr As Variant
        strArr = Split(rng(i).Value, ",")
        For ii = 0 To UBound(strArr)
            If strArr(ii) = WhatUw Then
                rng(i).Interior.ColorIndex = 43
            End If
        Next
Next
End Sub
Изменено: panix1111 - 17.07.2017 09:19:14
Мы в Екселе не работаем, мы в нём живём!
 
 
 
#8
17.07.2017 09:18:55
Цитата
copper-top написал:
vvvvvv
зачем удалил?( пытался разобраться
 
 
 
#9
17.07.2017 09:33:29
Цитата
Sereja написал:
чем удалил?
формула, которая ищет единицу
Код
=ЕСЛИ(И(ЕЧИСЛО(ЕСЛИОШИБКА(ПОИСК("1";E3);""));ИЛИ(ЕСЛИОШИБКА(ПСТР(E3;ЕСЛИОШИБКА(ПОИСК("1";E3);"")-1;1);"")="";ЕСЛИОШИБКА(ПСТР(E3;ЕСЛИОШИБКА(ПОИСК("1";E3);"")-1;1);"")=",");ИЛИ(ЕСЛИОШИБКА(ПСТР(E3;ЕСЛИОШИБКА(ПОИСК("1";E3);"")+1;1);"")="";ЕСЛИОШИБКА(ПСТР(E3;ЕСЛИОШИБКА(ПОИСК("1";E3);"")+1;1);"")=","));1;"")
 
 
 
#10
17.07.2017 09:35:44
Спасибо, только вот тоже самое с "2А" не могу проделать, хотя казалось бы нужно всего лишь поменять "1" на "2А"

Цитата
panix1111 написал: Вот процедура
Спасибо! Протестировал, почему то число 2/1 ищет только в 5-й строке, а в 1-й не видит
 
 
 
#11
17.07.2017 10:36:38
Фокусы цитирования :)
Цитата
Sereja написал: зачем удалил?
Цитата
copper-top написал (цитировал): чем удалил?
 
 
 
#12
17.07.2017 10:42:51
:D  :D  :D  
Изменено: Bema - 17.07.2017 10:45:12
Если в мире всё бессмысленно, — сказала Алиса, — что мешает выдумать какой-нибудь смысл? ©Льюис Кэрролл
 
 
 
#13
17.07.2017 11:59:55
Sereja В настройках поиска (опции) есть искать точное совпадение, вот и поставьте галочку и ищите себе. (сообщение #2), а до этого разбейте данные по столбцам.
Мой канал
 
 
 
Страницы: 1
Читают тему
Наверх