Формулы в этой статье полезны для извлечения слов из текста, содержащегося в ячейке. Например, вы можете создать формулу для извлечения первого слова в предложении.
Извлечение первого слова из строки
Чтобы извлечь первое слово из строки, формула должна найти позицию первого символа пробела, а затем использовать эту информацию в качестве аргумента для функции ЛЕВСИМВ. Следующая формула делает это: =ЛЕВСИМВ(A1;НАЙТИ(" ";A1)-1)
.
Эта формула возвращает весь текст до первого пробела в ячейке A1. Однако у нее есть небольшой недостаток: она возвращает ошибку, если текст в ячейке А1 не содержит пробелов, потому что состоит из одного слова. Несколько более сложная формула решает проблему с помощью новой функции ЕСЛИОШИБКА, отображая все содержимое ячейки, если произошла ошибка:
=ЕСЛИОШИБКА(ЛЕВСИМВ(A1;НАЙТИ(" ";A1)-1);A1)
.
Если вам нужно, чтобы формула была совместима с более ранними версиями Excel, вы не можете использовать ЕСЛИОШИБКА. В таком случае придется обойтись функцией ЕСЛИ и функцией ЕОШ для проверки на ошибку:
=ЕСЛИ(ЕОШ(НАЙТИ(" ";A1));A1;ЛЕВСИМВ(A1;НАЙТИ(" ";A1)-1))
Извлечение последнего слова строки
Извлечение последнего слова строки — более сложная задача, поскольку функция НАЙТИ работает только слева направо. Таким образом, проблема состоит в поиске последнего символа пробела. Следующая формула, однако, решает эту проблему. Она возвращает последнее слово строки (весь текст, следующий за последним символом пробела):
=ПРАВСИМВ(A1;ДЛСТР(A1)-НАЙТИ("*";ПОДСТАВИТЬ(A1;" ";"*";ДЛСТР(A1)-ДЛСТР(ПОДСТАВИТЬ(A1;"";"")))))
Но у этой формулы есть такой же недостаток, как и у первой формулы из предыдущего раздела: она вернет ошибку, если строка не содержит по крайней мере один пробел. Решение заключается в использовании функции ЕСЛИОШИБКА и возврате всего содержимого ячейки А1, если возникает ошибка:
=ЕСЛИОШИБКА(ПРАВСИМВ(A1;ДЛСТР(A1)-НАЙТИ("*";ПОДСТАВИТЬ(A1;" ";"*";ДЛСТР(A1)-ДЛСТР(ПОДСТАВИТЬ(A1;" ";"")))));A1)
Следующая формула совместима со всеми версиями Excel:
=ЕСЛИ(ЕОШ(НАЙТИ(" ";A1));A1;ПРАВСИМВ(A1;ДЛСТР(A1)-НАЙТИ("*";ПОДСТАВИТЬ(A1;"";"*";ДЛСТР(A1)-ДЛСТР(ПОДСТАВИТЬ(A1;" ";""))))))
Извлечение всего, кроме первого слова строки
Следующая формула возвращает содержимое ячейки А1, за исключением первого слова:
=ПРАВСИМВ(A1;ДЛСТР(A1)-НАЙТИ(" ":A1;1))
.
Если ячейка А1 содержит текст 2008 Operating Budget, то формула вернет Operating Budget.
Формула возвращает ошибку, если ячейка содержит только одно слово. Следующая версия формулы использует функцию ЕСЛИОШИБКА, чтобы можно было избежать ошибки; формула возвращает пустую строку, если ячейка не содержит более одного слова:
=ЕСЛИОШИБКА(ПРАВСИМВ(A1;ДЛСТР(A1)-НАЙТИ(" ";A1;1));"")
А эта версия совместима со всеми версиями Excel:
=ЕСЛИ(ЕОШ(НАЙТИ(" ";A1));"";ПРАВСИМВ(A1;ДЛСТР(A1)-НАЙТИ(" ";A1;1)))
- Первое слово ячейки Excel с большой буквы
- Вывести первое слово в отдельную ячейку — формула
- Оставить только первое слово в ячейке
- Взять первые 2/3/N слов ячейки
- Процедуры !SEMTools для извлечения первых N слов
Первое слово (до пробела) в Excel-ячейке часто приковывает внимание тех, кто работает с текстовыми данными. Его часто нужно выделить как отдельную единицу, с которой уже определенным образом оперировать — сделать его с заглавной буквы, выделить в отдельную ячейку, оставить только его в исходной ячейке и т.д.
Помимо первого слова ячейки, бывает также важно взять первое слово после него, и так далее.
Часто после извлечения требуется удалить первые слова из ячеек, но это уже кардинально другое действие, смотрите соответствующую статью.
Сделать первое слово ячейки с большой буквы не очень сложно, если перед ним нет никаких других символов. Но если там кавычки, скобки, тире или еще какая-то пунктуация, решение может быть существенно более сложным, чем просто взять первый символ ячейки и сделать его заглавным.
Поэтому я рассмотрел эту задачу в отдельной статье “Как сделать первую букву ячейки заглавной“.
Вывести первое слово в отдельную ячейку — формула
Если под первым словом понимаются символы строки до первого пробела, то функция довольно проста:
=ЛЕВСИМВ(A1;ПОИСК(" ";A1&" ")-1)
Здесь A1 – ячейка с искомым словом.
Обратили внимание на дополнительный пробел, добавляемый к значению исходной ячейки через амперсанд (&)? Он используется для ситуаций, когда первое слово в ячейке является единственным, или слов в ячейке нет совсем. Если не добавлять этот пробел, функция в таких случаях вернет ошибку.
А ошибки нам тут ни к чему, поэтому рекомендуется использовать формулу выше. Удобство формул в том, что, если их протянуть на весь второй столбец, при изменении данных в первом столбце первые слова будут автоматически вставляться в соседние ячейки.
Оставить только первое слово в ячейке
Простейший вариант сделать подобное в Excel – штатной процедурой “Найти и заменить“. Можно вызвать процедуру горячим сочетанием клавиш Ctrl + H, в первом окошке ввести пробел со звёздочкой (см. подстановочные символы в Excel), а второе оставить пустым как есть.
Есть и вариант с использованием !SEMTools, процедура находится в подразделе ИЗВЛЕЧЬ – Извлечь Слова – по порядку:
Взять первые 2/3/N слов ячейки
Чем больше число слов, которые вы хотите извлечь из ячейки, тем сложнее это будет сделать. В Google Spreadsheets есть замечательная функция SPLIT, с её помощью можно разбить ячейку на отдельные слова и брать каждое из них по его индексу, что делает инструмент идеальным для такой задачи. Но в Excel, к сожалению, подобной функции нет.
Однако, есть альтернативы. Например, чтобы взять первые два слова, один из вариантов формулы будет выглядеть так:
=ЛЕВСИМВ(A1;ПОИСК(ЮНИСИМВ(23456);ПОДСТАВИТЬ(A1&" ";" ";ЮНИСИМВ(23456);2))-1)
Формула использует особенные свойства функций ПОДСТАВИТЬ и ЮНИСИМВ:
- функция ПОДСТАВИТЬ позволяет заменить N-ую подстроку в ячейке на заданное значение
- а ЮНИСИМВ позволяет задать это значение настолько уникальным, насколько возможно, чтобы быть уверенным, что оно будет единственным в ячейке
Далее функция ПОИСК находит позицию этого символа, чтобы функция ЛЕВСИМВ взяла все что до него (из позиции вычитается единица).
Неплохая надёжная формула со своими преимуществами и недостатками.
Преимущество в том, что легко поддаётся модификации под задачу с извлечением 3,4 и далее слов, просто нужно заменить в формуле аргумент функции подставить, который 2, на соответствующее число.
Недостаток – ЮНИСИМВ работает только в Excel 2013 и старше. Вот аналог для более ранних версий, использующий функцию СИМВОЛ:
=ЛЕВСИМВ(A1;ПОИСК(СИМВОЛ(9);ПОДСТАВИТЬ(A1&" ";" ";СИМВОЛ(9);2))-1)
Функция добавляет в строку символ табуляции, также с высокой вероятностью изначально в ней отсутствующий.
Процедуры !SEMTools для извлечения первых N слов
Знание функций и формул Excel очень помогает в работе, для энтузиастов у меня есть целый Справочник функций Excel. Однако тратить время на составление сложных конструкций может быть накладно, равно как и хранить где-то на диске огромный файл с примерами их использования.
Тем, кто ценит время, будут полезны процедуры моей надстройки, среди которых и такая, которая позволяет взять первые N слов во всех выделенных ячейках. И либо вставить в соседний столбец, либо оставить в изначальных ячейках. За режим вывода отвечает маленький флажок в надстройке:
Хотите так же быстро извлекать слова по их позиции в Excel?
!SEMTools поможет с этой и решит многие другие задачи за пару кликов!
Перейти к содержанию
На чтение 2 мин. Просмотров 147 Опубликовано 23.05.2021
Если ячейка содержит несколько слов, как можно выделить определенное слово только в этой ячейке? А как насчет выделения этого слова в нескольких ячейках? В этой статье будет описан метод достижения этой цели.
Раскрасьте определенное слово в одной или нескольких ячейках с помощью кода VBA
Раскрасьте определенное слово в одной или нескольких ячейках кодом VBA
Следующий код VBA может поможет вам выделить определенное слово в выделенном фрагменте. Пожалуйста, сделайте следующее.
1. Выберите диапазон, содержащий ячейки, внутри которых вы хотите выделить определенное слово. Затем одновременно нажмите клавиши Alt + F11 , чтобы открыть окно Microsoft Visual Basic для приложений .
2. В открывшемся окне Microsoft Visual Basic для приложений нажмите Вставить > Модуль . Затем скопируйте и вставьте код VBA в окно кода.
Код VBA: раскрасьте определенное слово в ячейках в Excel
3. Нажмите клавишу F5 , чтобы запустить код. И в диалоговом окне Kutools for Excel введите определенное слово, которое вы выделите в ячейках, а затем нажмите кнопку OK . См. Снимок экрана:
Затем вы можете увидеть все слова, которые вы указанные ниже выделяются красным цветом в выбранных ячейках сразу же, как показано на скриншоте ниже.
Статьи по теме:
- Как выделить ячейку, если значение существует или равно ячейке в другом столбце в Excel?
- Как сравнить две строки на сходство или выделить различия в Excel?
- Как сделать имя вкладки листа равным значению ячейки в Excel?
- Как изменить значение в зависимости от цвета ячейки в Excel?
- Как изменить цвет ячейки при щелчке или выборе ячейки в Excel?
Как выделить определенный текст в ячейке на основе другого текста?
В Excel нам может быть легко выделить ячейки на основе определенного текста, но здесь я хочу выделить определенный текст в ячейке, чтобы сделать его выдающимся, но не всю ячейку. Для большинства из нас это, возможно, неприятно. В этой статье я расскажу о некоторых хитростях для решения этой задачи в Excel.
Выделите один или несколько конкретных текстов в нескольких ячейках с кодом VBA
Например, у меня есть ряд текстовых строк, и теперь я хочу выделить конкретный текст «Небо”В этих ячейках, чтобы получить результат, как показано на следующих снимках экрана:
Чтобы выделить только часть текста в ячейке, вам может помочь следующий код VBA.
1. Выберите ячейки, в которых вы хотите выделить конкретный текст, а затем удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. Нажмите Вставить > Модулии вставьте следующий код в Модули Окно.
Код VBA: выделите часть текста в ячейке:
Sub HighlightStrings()
'Updateby Extendoffice
Application.ScreenUpdating = False
Dim Rng As Range
Dim cFnd As String
Dim xTmp As String
Dim x As Long
Dim m As Long
Dim y As Long
cFnd = InputBox("Enter the text string to highlight")
y = Len(cFnd)
For Each Rng In Selection
With Rng
m = UBound(Split(Rng.Value, cFnd))
If m > 0 Then
xTmp = ""
For x = 0 To m - 1
xTmp = xTmp & Split(Rng.Value, cFnd)(x)
.Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3
xTmp = xTmp & cFnd
Next
End If
End With
Next Rng
Application.ScreenUpdating = True
End Sub
3, Затем нажмите F5 нажмите клавишу для запуска этого кода, и появится окно подсказки, напоминающее вам ввести текст, который вы хотите только выделить, см. снимок экрана:
4, Затем нажмите OK , весь указанный вами текст был выделен только внутри ячеек, см. снимок экрана:
Tips: Если вам нужно выделить несколько ключевых слов из текстовых строк, примените приведенный ниже код:
Код VBA: выделите несколько ключевых слов из текстовых строк:
Sub HighlightStrings()
'Updateby Extendoffice
Application.ScreenUpdating = False
Dim Rng As Range
Dim cFnd As String
Dim xTmp As String
Dim x As Long
Dim m As Long
Dim y As Long
Dim xFNum As Integer
Dim xArrFnd As Variant
Dim xStr As String
cFnd = InputBox("Please enter the text, separate them by comma:")
If Len(cFnd) < 1 Then Exit Sub
xArrFnd = Split(cFnd, ",")
For Each Rng In Selection
With Rng
For xFNum = 0 To UBound(xArrFnd)
xStr = xArrFnd(xFNum)
y = Len(xStr)
m = UBound(Split(Rng.Value, xStr))
If m > 0 Then
xTmp = ""
For x = 0 To m - 1
xTmp = xTmp & Split(Rng.Value, xStr)(x)
.Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3
xTmp = xTmp & xStr
Next
End If
Next xFNum
End With
Next Rng
Application.ScreenUpdating = True
End Sub
Затем во всплывающем окне введите ключевые слова, которые вы хотите выделить (разделите слова запятыми), см. Снимок экрана:
А затем нажмите OK кнопки, указанные слова были выделены сразу, см. скриншоты:
Внимание: Приведенные выше коды чувствительны к регистру.
Выделите один или несколько конкретных текстов в нескольких ячейках с помощью удивительной функции
Если вы не знакомы с кодом в Excel, здесь я представлю простой инструмент — Kutools for Excel, С его Отметить ключевое слово вы можете выделить одно или несколько ключевых слов сразу в ячейках.
Примечание:Чтобы применить эти Отметить ключевое слово функции, во-первых, вы должны скачать Kutools for Excel, а затем быстро и легко примените функции.
После установки Kutools for Excel, пожалуйста, сделайте следующее:
1. Нажмите Кутулс > Текст > Отметить ключевое слово, см. снимок экрана:
2. В Отметить ключевое слово диалоговом окне выполните следующие действия:
- Выберите диапазон данных, который вы хотите использовать, из Диапазон текстовое окно;
- Выберите ячейки, содержащие ключевые слова, которые вы хотите выделить, вы также можете ввести ключевые слова вручную (через запятую) в поле Ключевое слово текстовое поле.
- Наконец, вы должны указать цвет шрифта для выделения текста галочкой Отметить цвета ключевых слов вариант. (Чтобы раскрасить все ячейки, содержащие ключевые слова, выберите Отметьте цвета содержимого ячейки опция)
3, Затем нажмите Ok кнопки, все указанные тексты были выделены, как показано ниже:
Внимание: Эта функция не чувствительна к регистру, если вы хотите выделить текст с учетом регистра, установите флажок С учетом регистра в Отметить ключевое слово диалоговое окно.
Выделите определенный текст в ячейке на основе другого текста с помощью кода VBA
Вот еще одна ситуация, у меня есть два столбца, первый столбец которых содержит текстовые строки, а второй столбец — это конкретный текст, теперь мне нужно выделить относительный текст в первом столбце на основе определенного текста во втором столбце для каждого ряд.
1. Удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. Нажмите Вставить > Модулии вставьте следующий код в Модули Окно.
Код VBA: выделение части текста в ячейке на основе другого текста:
Sub highlight()
'Updateby Extendoffice
Dim xStr As String
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim xChar As String
Dim I As Long
Dim J As Long
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
LInput:
Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "not support multiple columns"
GoTo LInput
End If
If xRg.Columns.Count <> 2 Then
MsgBox "the selected range can only contain two columns "
GoTo LInput
End If
For I = 0 To xRg.Rows.Count - 1
xStr = xRg.Range("B1").Offset(I, 0).Value
With xRg.Range("A1").Offset(I, 0)
.Font.ColorIndex = 1
For J = 1 To Len(.Text)
If Mid(.Text, J, Len(xStr)) = xStr Then .Characters(J, Len(xStr)).Font.ColorIndex = 3
Next
End With
Next I
End Sub
3. После вставки кода нажмите F5 нажмите кнопку для его запуска, появится окно подсказки, напоминающее вам о выборе диапазона данных, который содержит текстовую строку и конкретный текст, который вы хотите выделить и на основе которого, см. снимок экрана:
4, Затем нажмите OK , весь соответствующий текст в первом столбце, основанный на конкретном тексте во втором столбце, был окрашен в красный цвет, как показано на следующем снимке экрана:
Больше относительных статей:
- Полужирный текст части при объединении двух столбцов в Excel
- На листе Excel после объединения двух значений ячеек с формулами вы можете обнаружить, что часть текста в объединенной ячейке формулы не будет выделена жирным шрифтом. Иногда это может раздражать, как вы можете выделить текст жирным шрифтом при объединении двух столбцов в Excel?
- Объедините столбцы ячеек и сохраните цвет текста в Excel
- Как все мы знаем, при конкатенации или объединении столбцов ячеек в один столбец форматирование ячеек (например, цвет шрифта текста, форматирование чисел и т. Д.) Будет потеряно. В этой статье я расскажу о некоторых хитростях, позволяющих объединить столбцы ячеек в один и максимально упростить сохранение цвета текста в Excel.
- Отображение определенного текста на основе значений в другом столбце
- Предположим, у меня есть список чисел, теперь я хочу отобразить какой-то конкретный текст в другом столбце на основе номеров этого столбца. Например, если номер ячейки находится в диапазоне от 1 до 100, я хочу, чтобы текст «Уменьшить» отображался в соседней ячейке, если номер находится в диапазоне от 101 до 200, отображается текст «Стабильный», а если число больше 200 , отображается текст «Увеличение», как показано на следующем снимке экрана. Для решения этой задачи в Excel вам могут помочь следующие формулы из этой статьи.
- Сумма ячеек с текстом и числами в Excel
- Например, у меня есть список значений, содержащих числовые и текстовые строки, теперь я хочу суммировать только числа на основе одного и того же текста, посмотрите на следующий снимок экрана. Обычно вы не можете напрямую суммировать значения в списке с помощью текстовой строки, здесь я представлю вам несколько формул для решения этой задачи.
Лучшие инструменты для работы в офисе
Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%
- Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
- Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон…
- Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны…
- Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
- Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
- Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии…
- Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
- Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF…
- Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
Здраствуйте! Интересует вопрос по excel 2003: на рабочем листе необходимо выделить одно слово( допустим синим цветом ) множество раз, при попытке выделить это слово через автозамену — выделяется вся строчка, иные попытки разобраться также не привели к успеху… |
|
Igor67 Пользователь Сообщений: 3729 |
Только 2 варианта |
Скажем сразу: в excele я, мягко говоря , начинающий, а руками все выделять утомило… Решения пока не нашёл. Возможно подскажете конкретно решение (по пунктам=) и формулу… Опытный образец прилагаю.(надо выделить слово «Модель:» — синим цветом и полужирным шрифтом на всём листе. |
|
Johny Пользователь Сообщений: 2737 |
Попробуй. There is no knowledge that is not power |
Johny Пользователь Сообщений: 2737 |
Убрал ненужные элементы There is no knowledge that is not power |
Примеры у вас: Johnny, и у вас Казанский вышли славные и годятся к использованию =) А теперь решающий вопрос : как мне самому написать подобное. |
|
А зачем Вам еще что-то писать? Вам дали примеры макросов. У Johny ищет слово в выделенном диапазоне, а у Казанский выбранное слово по всему листу. |
|
Сергей_М Гость |
#10 27.04.2011 16:46:52 Благодарю всех участвовавших в решении моей маленькой «цветной проблемы» — вопрос урегулирован(при помощи макросов) успешно!! За сим откланиваюсь… |
Если строка в ячейке содержит ФИО, например, «Петров Василий Иванович», то можно создать формулу для вывода первого слова (фамилии).
Пусть текстовая строка
Петров
Василий Иванович
находится в ячейке
A
1
. Выведем фамилию (см.
файл примера
):
=ЛЕВСИМВ(A1;ПОИСК(» «;A1)-1)
Перед применением формулы убедитесь, что в строке нет лишних пробелов. Это можно сделать функцией
СЖПРОБЕЛЫ()
.
Число слов в строке д.б. два и более. Если нет гарантии, что в строке есть хотя бы два слова, то нужно использовать другую формулу:
=ЕСЛИОШИБКА(ЛЕВСИМВ(A1;ПОИСК(» «;A1)-1);A1)
или такую (для EXCEL 2003)
=ЕСЛИ(ЕОШИБКА(ПОИСК(» «;A1)-1);A1;ЛЕВСИМВ(A1;ПОИСК(» «;A1)-1))
Как альтернативу можно посоветовать воспользоваться инструментом
Текст-По-Столбцам
(
), позволяющему, разделить текстовую строку на несколько строк.
Если необходимо из текстовой строки вывести последнее слово, то читайте статью
Выбор из строки последнего слова
.
Выделение содержимого ячеек в Excel
Смотрите также открытой форме выбирать в формулах..лых..ЛОХ!
т.е для ПИТЬЕВОЙ универсальный, но вариант. с учетом этого следуют друг заВладимир
Выделение ячеек
-
верный результат. Так за помощь. отобразиться интервал, затем Например, рассмотрим некоторые для округления дробных
-
(слово)). текст, но не перечня и, в удовлетворяющих 1 критериюВ Excel можно выделять выбирать диапозоны иKuklP
-
«ДАНОН» Персик-Маракуйя 290 В ячейку пишем замечания)) другом без разрывов,
Выделение строк и столбцов
-
: Вот на примитивном что может бытьelleb снова прибавляем 11 возможные варианты записи чисел до ближайшихСлово Разряд в списке
-
совпадающих с ним. случае успеха, возвращает (без учета РЕгиСТра). содержимое ячеек, строк применять макрос ?: The_Prist дал полностью
-
выдаст 2900 =ТОЛЬКОЦИФРЫ(А1)Guest то извлечь текст
Выделение таблицы, списка или листа
-
уровне имеет смысл вписать: Решение задачи поста и т.д… функции ЛЕВСИМВ и
-
целых значений с не встречается (склонения Например, слово в начальную позицию найденного Критерий введем в или столбцов.
Юрий М исчерпывающий ответ. ИУ меня этоFunction ТОЛЬКОЦИФРЫ(ячейка As: и если не числа из строкиmazayZR слово целиком. 14 с помощьюЗаранее спасибо) результаты ее выполнения: использованием формул для
support.office.com
Выделение ячеек c ТЕКСТом с применением Условного форматирования в MS EXCEL
не считаются). А списке Мотодрель содержит значения. В противном ячейкуПримечание:: Надеюсь, sva меня то, что я тоже не сразу Range) As Long всегда будет «=»=ПСТР(A4;ПОИСКПОЗ(ИСТИНА;ЕЧИСЛО(ПСТР(A4;СТРОКА(ДВССЫЛ(«1:»&ДЛСТР(A4)));1)*1);0);СУММ(ЕЧИСЛО(ПСТР(A4;СТРОКА(ДВССЫЛ(«1:»&ДЛСТР(A4)));1)*1)*1)): а вот сюдаvikttur макросов в теме:Перед 6195 нолик
ЛЕВСИМВ(«текст»;200%) вернет значение «те» работы с текстом. вот слово Техниктекст случае возвращается ошибкаB6 Если лист защищен, возможность простит. хотел написать - было отработано -
Исходная таблица с текстовыми значениями
Dim i As перед счётом/извлечь из строки еще загляните… взято: Извлечение части данных пропуститила. (преобразование процентов вФорма для округления числовых встречается как в
Задача 1 (поиск значений в списке, совпадающих с единственным критерием)
Дрель, но #ЗНАЧ!. Кроме того, зададим выделения ячеек иRama и то что см. выше :-) Integer, Результат As
- Serge символы(начиная от первой с форума, автораYberpleks
- из одной ячейкиSerge 007 числовое значение); значений имеет следующий начале фраз, так
- словоФормула ПОИСК($A$6;A9) возвращает номер позиции 4 Типа поиска:
- их содержимого может: Все отлично. Для умничка kim предложил.
Юрий М String: С перепугу наваять цифры, всего столько к сожалению не, не цитируйте все макросом: См вложение
Решение
при аргументах: («текст»;ИСТИНА) вернет вид: и в серединеДрель не содержится текстовой строки изТочно совпадает (выделение ячеек, быть недоступна. себя я добавил Так что я: Если «ДАНОН» наDim Символ As можно такое(см. вложение) символов сколько цифр)/ записал… подряд!chumichАнастасия999 «т» (логическое ИСТИНА
В ячейке B3 введена и конце. в этой ячейке.
- ячейки содержащих значения вЧтобы выделить ячейку, щелкните черный еще. поступил правильно.
- порядок больше - String :-)
- 5. задача ЛузераmazayZR
- Guest: А как извелечь: Спасибо за быстрый эквивалентно числовому значению
- следующая сложная формула:Не смотря на то,Чтобы выделить ячейки в
А9
точности совпадающих с ее. Для переходаВсем спасибо.Юрий М беда. А вотFor i =kim, там когда — извлечь текст: а вот и: Всем привет! цифры из ячейки?
ответ! 1);=5,ЛЕВСИМВ(A2+1,НАЙТИ(«.»,A2)-1),ЛЕВСИМВ(A2,НАЙТИ(«.»,A2)-1)),»Число не введено»)’
что формулы похожи списке, которые содержат, с которой начинается искомым текстом);
- к ячейке и
- не ЛЕВСИМВ,ПРАВСИМВ…
- : Поискал по Форуму.
- если такое с
1 To Len(ячейка) нулёвку сгоняют перед от первой до автор — Лузер™Есть столбец, вНужно получить «3358»»
Andrei_Dпри аргументах: («текст»;ЛОЖЬ) вернет class=’formula’> на те, чтослово текст, указанный вСодержит (выделение ячеек, которые ее выделения такжекод товара находится
Действительно — оказывал водкой — этоСимвол = Mid(ячейка, счётом «=» нет, последней цифры (есливот и та каждой ячейки которого из «3358 -
: Добрый день, подниму пустое значение «»,Логика работы: использовались в ЗадачеДрель, нужно воспользоваться критерии (если он содержат искомый текст можно использовать клавиатуру. в каждой строке помощь с формулами. за ошибку не i, 1) твоя формула знач#
между цифрами есть тема названия городов и Специальные процедуры/ Дайвинг». тему вопрос из поскольку логическое ЛОЖЬПервая функция ЕСЛИ проверяет 2, они от формулами в файле найден). в начале, вЧтобы выделить диапазон, выделите в разных меятах..его Выглядело это так: считается.
If IsNumeric(Символ) Then даёт :( буквы или знакиSh_Alex улиц:AleksSid этой же темы, эквивалентно числовому 0 с помощью формулы них принципиально отличаются, примера на ЛистеНапример, для ячейки конце или середине ячейку, а затем нужно вытянуть в = A1
KuklPРезультат = РезультатБыло-бы «=», тогда они сохраняются): Пользовательская функция изa1 «Саратов, ул…»,: Какая, в данном но не много (нуль); ЕПУСТО, заполнена ли т.к. являются формулами «1 критерий (слово)».А14 строки); перетащите ее правый
другую строку..Rama: Типун Вам… & Символ вообще огород городить=ПСТР(ЛЕВСИМВ(A4;МАКС(ЕЧИСЛО(ПСТР(A4;СТРОКА(ДВССЫЛ(«1:»&ДЛСТР(A4)));1)*1)*СТРОКА(ДВССЫЛ(«1:»&ДЛСТР(A4)))));ПОИСКПОЗ(ИСТИНА;ЕЧИСЛО(ПСТР(A4;СТРОКА(ДВССЫЛ(«1:»&ДЛСТР(A4)));1)*1);0);ДЛСТР(A4)) ячейки «выцепляет» цифрыa2 «Москва, ул…»
случае, разница: цифры
сложнее. необходимо выделятьпри аргументах: («текст»;15/7) вернет ячейка, которая должна массива.Понятно, что нужно выделитьформула ПОИСК($A$6;A14) вернетНачинается (выделение ячеек, которые нижний край. Для
Задача 2 (поиск СЛОВ в списке, совпадающих с единственным критерием)
Serge: Уважаемые форумчане !DONEnd If не надо, формулуmazayZR и полученный StringТ.е. сначала идет или буквы? У значение из середины значение «те». содержать значение, котороеФункция ЛЕВСИМВ в Excel ячейки, в которых: 1, а для содержат искомый текст этого также можно: Одной функцией неСтолкнулся с проблемой
: Ребята! А вопросNext i я постом выше: да, пятый вариант преобразует в число. Город, потом заяпятая… вас цифры -
текста в другуюПримечание 2: в Excel
- требуется округлить. используется для получения
- точно содержится слово ДрельА15
- в начале строки); использовать SHIFT+клавиши со
- обойдёшься выделения нужного текста в догонку можно?
ТОЛЬКОЦИФРЫ = Val(Результат) приводил :-) несколько изящнее, чемPublic Function число(смесь
Помогите пожалуйста записать
часть текста.
ячейку
также существует схожая
Если число введено, запись
Задача 3 (поиск нескольких слов в списке)
части текста и ИЛИ;формула ПОИСК($A$6;A15) вернетЗаканчивается (выделение ячеек, которые стрелками.Надо писать формулу в ячейках сИзменяется значение вEnd Function
22, 5 Кб поиск цифр исходя
As String) код, который быКод =ЛЕВСИМВ(B3;НАЙТИ(«-«;B3)-2)Пример текста по принципу работы ЧЗНАЧ(ПРАВСИМВ(ЛЕВСИМВ(B2;НАЙТИ(«,»;B2)+1)) возвращает числовое возвращает заданное количествотекстовая строка начинается со
8 и обе содержат искомый текстЧтобы выделить несмежные ячейки из нескольких функций. текстом. Стандарным методом
ячейке и вkimSerge из номера символа…Dim i As брал только названиеМожно так для1122100098 надо выделить функция ЛЕВБ, возвращающая значение первого символа символов текстовой строки, слова Дрель ИЛИ;
ячейки будут выделены. в конце строки). и диапазоны ячеек,Собственно «вырезает» (возвращает (Найти и Заменить) формуле представленной ввиде: Или формулой массива:: Может Вы сразу
интересно, а «прополоть» Long Города… чисел. Код =ПСТР(B3;1;ПОИСК(«-«;B3)-2) в отдельную ячейку. определенное количество символов после запятой и при этом отсчет
Задача 4 (поиск нескольких слов в списке, общий случай)
текстовая строка заканчивается словом Если в ячейкеВ качестве примера Критерия выберите их, удерживая заданное число знаков только заменяется без текста меняется значение!=ПСТР(A1;ПОИСКПОЗ(;—ЕОШ(-ПСТР(A1;СТРОКА($1:$999);1)););ПОИСКПОЗ(2;1/НЕ(ЕОШ(-ПСТР(A1;СТРОКА($1:$999);1))))-ПОИСКПОЗ(;—ЕОШ(-ПСТР(A1;СТРОКА($1:$999);1));)+1) всех тузов из строку получится? :-)For i =Как сделать это Для текста. Код
используя формулу текстовой строки слева сравнивает полученное значение символов начинается слева. Дрель ИЛИ; не содержится искомый используем текст «Дрель», нажатой клавишу CTRL.
с указанной позиции) формата. Мне нужно 1,25 иземеняется наlapink2000 рукава вытащите (яGuest 1 To Len(смесь) в EXCEL при
excel2.ru
Примеры использования функции ЛЕВСИМВ в Excel работа с текстом
=ПСТР(B3;ПОИСК(«-«;B3)+2;999)у меня остается на основе определенного с числом 5.Пример 1. В таблицеслово Дрель содержится в текст, то формула
Как вырезать часть текста из строки функцией ЛЕВСИМВ в Excel?
который введем вВыберите букву в верхней функция ПСТР. необходимый текст (в 30 (30 х: Вот такой вариант про пример, в: если сорняки вSelect Case Asc(Mid(смесь,
помощи «Левсимв» я
Yberpleks хвост количества байтов. ЕслиЕсли полученное значение больше
Excel содержатся имена середине текстовой строки возвращает ошибку и ячейку части столбца, чтобыНо «указанную позицию» тексте ячейки) в
78,9 х 0,45 формулой. Более длинный котором есть все куче то без i, 1)) знаю, хотелось бы: Добрый день!
что необходимо добавить
Как вытащить часть текста из ячейки в Excel используя функцию ЛЕВСИМВ?
по умолчанию используется 5, будет возвращен переменных вместе с (критерий обрамлен пробелами). ячейка не выделяется.B6 выделить его целиком. надо ещё вычислить. нужном диапозоне ячеек
х 5)+20%
но без матричного возможные условия)?
проблем, доехал до
- Case 48 To обойтись без EXELкихНарод, прошу помощи!!!! что бы оставалось язык с поддержкой результат выполнения функции текстом, определяющим ихВ принципе можно записатьПримечание. Естественно, для критерия Можно также щелкнутьНе видя конкретной
- выделить красным иИ как текст ввода и оченьНАМ попроще будет начала включил прополочную 57 формул…
Тема значит такая.
только необходимое мне
двухбайтовой кодировки, для ЛЕВСИМВ(B2+1;НАЙТИ(«,»;B2)-1), то есть тип данных. Необходимо одну большую формулу: Обратите внимание, что можно использовать любой любую ячейку в структуры Вашего текста жирным. типа (1,25 х быстрый в пересчете:
сделать то, что
Округление чисел текстовыми функциями в текстовой строке
машину, начались помидорычисло = числоПытливый У меня есть значение? получения первого символа
целой части числа выделить только названия и не использовать
будет выделена ячейка другой текст.
столбце и нажать трудно посоветовать конкретно,
Спасибо.
- 78,9 х 0,45’=—ПСТР(ЛЕВСИМВ(A1;МАКС(ЕСЛИ(ЕЧИСЛО(НАЙТИ({0;1;2;3;4;5;6;7;8;9};A1));НАЙТИ({0;1;2;3;4;5;6;7;8;9};A1))));МИН(ЕСЛИ(ЕЧИСЛО(НАЙТИ({0;1;2;3;4;5;6;7;8;9};A1));НАЙТИ({0;1;2;3;4;5;6;7;8;9};A1)));32000) нужно ВАМ… выключил прополочную машину & Mid(смесь, i,: Привет.
- текст в ячейкеAndrei_D строки требуется в +1 по правилам переменных и записать дополнительные столбцы (C:F)
- со словом Мотодрель,Выбор Типа поиска организуем клавиши CTRL+ПРОБЕЛ. но если, например,nilem х 5)+20% заставитьZVI
- Hugo
удалить текст от 1)Уточните задачу: Excel. для работы: Так не получится? качестве аргумента указать округления. их в отдельный=ИЛИ(ИЛИ(ЕСЛИОШИБКА(A9=$A$6;0)); как ячейка содержащая с помощью ЭлементовВыберите номер строки, чтобы
Функция ЛЕВСИМВ в Excel и особенности ее использования
коду товара предшествует: например: считать!: Ещё вот такое: Ну при счёте первой до последнейEnd Select…Помогите пожалуйста записать
мне необходимо использовать
Код =ПСТР(J17;НАЙТИ(«1122»;J17)+1;9)
- число 2, аЕсли столбец.ИЛИ(ЕСЛИОШИБКА(ПОИСК(» «&$A$6&» «;A9);0)); критерий. Но, если управления формы Группа выделить ее целиком.
- (или находится вSub ert()KuklP придумалось: 50:20 только цифры (если между
Next
- код, который бы только часть этогоИюлька для получения последующихПримечание: данный алгоритм нельзяИсходная таблица данных:ИЛИ(ЕСЛИОШИБКА(ПОИСК($A$6&» «;ЛЕВСИМВ(A9;ДЛСТР($A$6)+1));0));
- нужно найти ячейки и Переключатель. Свяжем Можно также щелкнуть конкретно месте этогоDim r As: Знаю, но позориться=ПРОСМОТР(99^99;—ЛЕВСИМВ(ПСТР(A11;МИН(НАЙТИ({0;1;2;3;4;5;6;7;8;9};A11&»0123456789″));15);{1;2;3;4;5;6;7;8;9;10;11;12;13;14;15}))=INDEX(SUBSTITUTE(MID(A1;FIND(«=»;A1)+1;99);{«-«,»:»};»»);;MATCH(MIN(LEN(SUBSTITUTE(MID(A1;FIND(«=»;A1)+1;99);{«-«,»:»};»»)));LEN(SUBSTITUTE(MID(A1;FIND(«=»;A1)+1;99);{«-«,»:»};»»));)) цифрами есть буквычисло = Val(число)
- брал только название текста, остальное в: Получается, спасибо второго, третьего и назвать гибким и
- Для выделения первого символа,ИЛИ(ЕСЛИОШИБКА(» «&$A$6=ПРАВСИМВ(A9;ДЛСТР($A$6)+1);0)) содержащие все Переключатели с любую ячейку в кода) какой-то символ,
- Range не хочу. ТутZVIне глючит, но или знаки ониEnd Function Города…
- данном случае спам.AlexM прочих символов необходимо
- он имеет некоторые которым является искомое)слово
- ячейкой строке и нажать то можно использоватьFor Each r такие ЗУБРЫ формулисты:
- : Вот так, пожалуй, правда тогда 5020
удаляются)С уважением, Александр.и что дальше?Вопрос: Существует-ли формула: Здравствуйте. указывать соответствующие числа, недостатки (например, не название переменной, используемРассмотрим списки, элементами которыхДрель (т.е. текст,B9 клавиши SHIFT+ПРОБЕЛ. функцию ПОИСК. In Range(«A1:A» & ZVI, kim, KL, даже лучше - тоже непонятно как=ЛЕВСИМВ(A12;ПОИСКПОЗ(ИСТИНА;ЕЧИСЛО(ПСТР(A12;СТРОКА(ДВССЫЛ(«1:»&ДЛСТР(A12)));1)*1);0)-1) & ПСТР(A12;МАКС(ЕЧИСЛО(ПСТР(A12;СТРОКА(ДВССЫЛ(«1:»&ДЛСТР(A12)));1)*1)*СТРОКА(ДВССЫЛ(«1:»&ДЛСТР(A12))))+1;ДЛСТР(A12))Sh_Alex Броса повыше? удалял? позволяющая вычленять частьТребуется Ваша помощь: кратные двум. Для учтен вариант ввода
exceltable.com
Извлечение части данных из одной ячейки
формулу: являются отдельные слова отделенный от других. Теперь при выбореЧтобы выделить несмежные строкиOlga /pilot/ stepanova Cells(Rows.Count, 1).End(xlUp).Row) да еще и если в тексте расценивать (можетDL: И в продолжение выводил в др.ячейку? текста из ячейкиВ одной ячейке языков с однобайтовой сразу целого числа).Второй равен 1 по (не фразы). Выделять слов пробелами), то Типа поиска Точно
или столбцы, выберите: ctrl+x — вырезать,
With r.Characters(8, 6).Font Юрий М, что
нет числа, то 502-0)
: непосредственно использовать 5 предыдущего поста. или в текущей в Excel?
вот это кодировкой функции ЛЕВСИМВ Он приведен в
умолчанию, поэтому функция будем только ту нужно обратиться к совпадает в этой их номера, удерживая ctrl+v — вставить,.Bold = True: мне только хвост
выдаст ноль:Hugo
уже не прокатитПеределал название функции. ячейке надо толькоДля детального понимания1I2430-110-Бело-синий, 110, Бело-синий и ЛЕВБ возвращают качестве примера использования возвращает первый символ. ячейку, которая содержит решению Задачи 2 ячейке будет содержаться нажатой клавишу CTRL. ctrl+с — скопировать .Color = vbRed поджать…=ПРОСМОТР(99^99;—ЛЕВСИМВ(ПСТР(A1&»0″;МИН(НАЙТИ({0;1;2;3;4;5;6;7;8;9};A1&»0123456789″));15);{1;2;3;4;5;6;7;8;9;10;11;12;13;14;15})): Ну ладно, возьмём
9 вложенных функций
Public Function ТолькоЦифра(смесь название города оставить?
прикладываю Вам EXCEL, надо в одну
идентичные результаты. функции ЛЕВСИМВ. Для Аналогично выделим названия
любое из слов-критериев (см. ниже). число 1, приЧтобы выделить список илиTat vEnd WithЮрий МПредыдущая формула была реальный счёт 11-1
эксель не кушает,
As String)Может проще текст
файлик. Ту информацию
ячейку цифры (110),Анастасия999
расчетов лучше использовать переменных из других (см. файл примераФормула $A$6=ПРАВСИМВ(A9;ДЛСТР($A$6)) возвращает правую
выборе Содержит - таблицу, щелкните любую: ЗАМЕНИТЬ либо ПОДСТАВИТЬ
Next: Сергей, с каких
для A11, эта :)
поэтому и приведены
Dim i As по столбцам сделать которая мне необходима, а другую слова,: Подскажите, пожалуйста, как встроенную функцию ОКРГУГЛ строк. В результате Лист Неск критериев (слово часть каждого значения
2, Начинается -
содержащуюся в нихВиталий степанюкEnd Sub это пор я
— для A1.Serge
формулы 1-3, вот Long
с разделителем «,»? выделена красным.
первые 6 цифр с помощью формулы и подобные ей. получим: точно)). перечня длиной равной 3, Заканчивается - ячейку и нажмите: Самый простой способsva формУлист? Да и
Обе — обычные: В игре «Локомотив-Барселона»?! их можно использоватьFor i =HugoZ не нужны. Во извлеч из ячейкиФункция ЛЕВСИМВ используется нарядуКак видно на рисункеЭто можно сделать несколькими критерию, т.е. в 4 (см. файл клавиши CTRL+A. — становишься на: Sub fnd()
далеко не зубр! формулы, а неHugo
как аргументы добавочных 1 To Len(смесь): Sub tt()
: Да! вложении образец. часть данных. Как
с прочими функциями с помощью функции способами. нашем случае 5 примера Лист 1Чтобы выделить весь лист, нужную ячейку и
Dim sSlovo As Колитесь. Я токма формулы массива.: 11-1 :) функций, что иSelect Case Asc(Mid(смесь,MsgBox Split([a1], «,»)(0)
=ПСТР()Заранее благодарна. правило данные, в
для работы с ЛЕВСИМВ получилось вытащитьВариант с использованием Массива
(т.к. в критерии критерий (текст)). нажмите клавиши CTRL+A нажимаешь F2 - String, c As если макросом…
ZVI
Hugo используется в 4 i, 1))End Sub
CyberForum.ru
Формула на вычленение части текста.
YberpleksИюлька
моем случае, что
текстовыми строками в левую часть текста констант и имени. «Дрель» 5 букв),Настроим Условное форматирование для или кнопку ячейка доступна к Range
DON: Подправил для случая,: Тьфу, хотел наоборот и 5
Case 48 ToПытливый: Эммм….: Код =ПСТР(ПСТР(A2;ПОИСК(«, «;A2)+2;99);ПОИСК(«,»;ПСТР(A2;ПОИСК(«, числа, иногда с
Excel (ПРАВСИМВ, СИМВОЛ, из каждой ячейки
В этом случае
а затем сравнивает выделения ячеек, удовлетворяющих
Выделить все редактированию… можно нажиматьsSlovo = Application.InputBox(Prompt:=»Введите
: А если немного когда число -
написать 1-11
Веталь 57: Sub GetCity()А можно объяснить «;A2)+2;99))+2;99) и Код
использованием «(» или СЦЕПИТЬ, ДЛСТР и
по одному (первому) в правиле Условного ее с критерием. критерию. Для этого:в левом верхнем
стрелочки «влево» и слово для поиска», попозорится? в конце строки:Hugo
: Даны например:ТолькоЦифра = ТолькоЦифраActiveCell.Value = Left(CStr(ActiveCell.Value), как она работает =ЛЕВБ(ПСТР(A2;ПОИСК(«, «;A2)+2;99);ПОИСК(«?,»;ПСТР(A2;ПОИСК(«, «;A2)+2;99)))
«-«. Например: значение прочими) и имеет символу. форматирования нужно ввести
Если оба выражениявыделите ячейки, в которые углу. «вправо», а также Default:=»»)Очень нужно!
=ПРОСМОТР(99^99;—ЛЕВСИМВ(ПСТР(A1&»_0″;МИН(НАЙТИ({0;1;2;3;4;5;6;7;8;9};A1&»_0123456789″));15);{1;2;3;4;5;6;7;8;9;10;11;12;13;14;15})): Хотя в АА
Локомотив-Барселона=5-0 & Mid(смесь, i, InStr(1, CStr(ActiveCell.Value), «,») с моим файлом?Июлька в ячейке - следующую синтаксическую запись: формулу =ИЛИ($A2=Слова), где совпадают, то это введен перечень инструментовПримечание: выделять текст мышкой..If sSlovo =
kimZVI результат от этогоЛокомотив Барселона=3-3 1)
planetaexcel.ru
VBA Часть текста из ячейки.
— 1)V
: спасибо «(123)0008», необходимо перенести=ЛЕВСИМВ(текст;[число_знаков])Пример 2. В таблицу
Слова — это Имя
означает, что значение
( В некоторых случаях выделение
или с кнопкой «false» Then Exit: DON, макрофункция ВЫЧИСЛИТЬ(): То же самое
не изменился.Локомотив-Барселона=1:2End SelectEnd Sub: для данного примера.AlexM
в отдельную ячейкуОписание аргументов:
Excel подтягиваются данные
массива констант. перечняА9:A17 одной ячейки может
shift. Дальше - Sub легко с этим для тех, комуkimЛокомотив-Барселона 0-0
NextОбрабатывает активную ячейку=ПРАВСИМВ(ЛЕВСИМВ(A1;ПОИСК(» ДАО»;A1)-1);10)
: Здравствуйте. только данные после
текст – ссылка на
из другого программного
Этот способ не оченьзаканчивается
); привести к выбору «копировать» — и
For Each c
справляется, если конечно
важнее краткость:: Дык, мы жа в другие
ТолькоЦифра = Val(ТолькоЦифра)GuestSanja
Опять, я к
скобки — «0008».
ячейку, содержащую текст,
продукта. Одно из
удобен, т.к. прина текст, указанныйвызовите инструмент Условное форматирование нескольких смежных ячеек. вставляешь куда тебе In Selection правильно понял…=ПРОСМОТР(2^64;—ЛЕВСИМВ(ПСТР(A1&»_0″;МИН(НАЙТИ({0;1;2;3;4;5;6;7;8;9};A1&»_0123456789″));15);СТРОКА($1:$15))) уже договорились последние ячейки надо чтобEnd Function
: Ребята, спасибо большое
: Точнее и полнее
Вам за помощью… Или другой пример:
или текстовая строка, полей данных получило
изменении критериев придется
в Критерии. (Главная/ Стили/ Условное Советы о том,
нужно.If InStr(c.Value, sSlovo)
planetaexcel.ru
Выцепить цифры из содержимого ячейки
DONasya
пробелы на «=»
выводило ТОЛЬКО числа,т.е.А эта функция
за помощь!!!
всего это сделает
В одной ячейке
«123456», надо что
в которой требуется ошибку. Для обработки
изменять массив константПримечание форматирование/ Создать правило)
как устранить этуVlada > 0 Then: Скорее всего вы: заменить…
50 оставляет только текст.Hugo, это вообще
справка по этой вот это 1I2430-110-Бело-синий,
бы в отдельной выделить требуемое количество ошибки необходимо выделить в Диспетчере имен.: Обратите внимание, что
выберите Использовать формулу для проблему, см. в
: Не очень хорошо c.Characters(Start:=InStr(c.Value, sSlovo), Length:=Len(sSlovo)).Font.Color
поняли правильно, чегоasya
kim33
Public Function ТолькоТекст(смесь чудо-штука!) Как раз
функции 110, Бело-синий, надо ячейке были только
символов слева. Аргумент
ее код и
Вариант с использованием именованного
будет выделена ячейка
определения форматируемых ячеек;
публикации сообщества под поняла вопрос… речь = vbRed
немогу сказать о
: Подправил для случая,: Чтоб ничего не
12 As String)
такую и хотел!)Сергей
в одну ячейку три последние цифры
обязателен для заполнения. описание из строки.
диапазона. со словом Мотодрель,в поле «Форматировать значения,
названием Как предотвратить
о том, что
Next
себе…
когда число - заменять, можно так:
00Dim i As
Sub tt(): можно
цифры (110), надо «456».
[число_знаков] – необязательный дляИсходные данные:
Формула =ИЛИ($B2=Слова_в_диапазоне) аналогична как ячейка заканчивающаяся
для которых следующая одновременное выделение нескольких если, например, в
End Subмакрофункция ВЫЧИСЛИТЬ() где
в конце строки:ВетальПодскажите как это
Long
MsgBox Split([a1], «,»)(0)
V
собрать цвета и
Буду очень благодарна заполнения аргумент; числовоеВыделим код ошибки с
предыдущей, но имя на критерий. Но,
формула является истинной»
ячеек в Excel?. ячейке есть группы
Rama
живет???=ПРОСМОТР(99^99;—ЛЕВСИМВ(ПСТР(A1&»_0″;МИН(НАЙТИ({0;1;2;3;4;5;6;7;8;9};A1&»_0123456789″));15);{1;2;3;4;5;6;7;8;9;10;11;12;13;14;15})){/post}{/quote}
: 1.) из ячейки
сделлать в EXCEL’еFor i =End Sub: дополнил формулу Сергея цифры из нескольких
за помощь! значение, характеризующее количество помощью следующей формулы: Слова_в_диапазоне теперь ссылается если нужно найти
введите =ВЫБОР($B$9;$A$6=A9;ПОИСК($A$6;A9);ПОИСК($A$6;A9)=1;$A$6=ПРАВСИМВ(A9;ДЛСТР($A$6)))
Выделяем ячейки, содержащие искомый чисел 001 002: Спасибо, но уKuklP
ZVI с такими данными: !!!???? 1 To Len(смесь)______________ если число не ячеек в одну,
аналитика
символов, которые требуетсяОписание: на диапазон ячеек ячейки содержащиевыберите требуемый формат, например,
текст. Рассмотрим разные 003 и так
Вас выделяет красным: Я читаю форум.: ТОЛЬКОЦИФРЫ() — это 33/12 , вHugoSelect Case Asc(Mid(смесь,Hugo
всегда десятизначное. =ЛЕВСИМВ(ПСТР(A2;ПОИСК(«ки ну т.е.цвета в: ф-ция ПСТР выделить из текстовойЛЕВСИМВ(B5;НАЙТИ(«3»;B5)+1) – функция, выделяющая листа (см. статью
слово
красный цвет фона варианты: выделение ячеек, далее, нужно вырезать
по отступу. Мое И видел как
пользовательская функция (макрос), другие ячейки выводить: В данном случае i, 1)): Только если в «;A2)+3;99);ПОИСК(» «;ПСТР(A2;ПОИСК(«ки «;A2)+3;99))-1) одну ячейку, а
Все имена заняты строки.
часть текстовой строки
Именованный диапазон). При
Дрель (т.е. текст,
.
содержащих значения в только 001, так? слово (фраза) может
Вы с макросами…
который можно увидеть,
число стоящее перед
подойдёт и
Case 32 To строке не будетYberpleks
цифры в другую..: …..Примечания 1:
слева, количество символов
добавлении новых слов отделенный от других
Протестируем: точности совпадающих с Если вопрос в в разном месте
И в моем
если в post_129271.xls чертой, а в=MID(A1;LEN(A1)-2;1)& RIGHT(A1;1)
47 запятой — выдаст: Такс, с формулойДиапазон ограничен жирной
Serge 007
Если необязательный аргумента [число_знаков] в которой соответствуют в ячейки в слов пробелами), то
Если в качестве примера
искомым текстом; выделение этом, то необходимо:
текста быть. заявлении нет ничего, нажать Alt-F11 другую после, причем
SergeТолькоТекст = ТолькоТекст всю строку. Поэтому
Сергея я разобрался, рамкой, несколько ячеек: Код =ПРАВСИМВ(A1;ДЛСТР(A1)-НАЙТИ(«)»;A1)) В явно не указан,
порядковому номеру символа столбце F, придется нужно обратиться к Критерия используется текст
ячеек, которые содержат Войти в строкуRama что противоречило бы
ZVI эти числа могут: Неудачный пример :-) & Mid(смесь, i, ещё сперва навесьте
а вот Вашу обведено жирной рамкой А1 по умолчанию будет «3» (функция НАЙТИ
переопределять именованный диапазон.
решению Задачи 2 «Дрель», а Тип искомый текст в формул — выделить: Огромное спасибо sva, утверждению: Юрий М: Формула на английском:
быть и однозначными(меньшеЕсли Локо не 1)
проверку (на Instr() уже не осилил. из них надо
(123)0008
возвращен первый символ выполняет поиск порядковогоВариант с использованием динамического (см. ниже). поиска выбран Точно
начале, в конце 001 — Меню то что нужно. — макрушник:-)
=LOOKUP(2^64,—LEFT(MID(A1&»_0″,MIN(FIND({0,1,2,3,4,5,6,7,8,9},A1&»_0123456789″)),15),{1,2,3,4,5,6,7,8,9,10,11,12,13,14,15})) 10) , и
наклепает Барсе болееCase 58 To
например или UBound())У меня кстати в одну ячейку
Код =ПОДСТАВИТЬ(A2;123;»») В строки. Например, функция номера этого символа диапазона
Если критерий содержится в совпадает (1), то или середине строки. Правка — КопироватьМои мечты: Если
То DON: ВамZVI трёхзначимыми….
десятка (или наоборот), 255 на наличие запятой, бывают случаи когда собрать разные цвета А2 =ЛЕВСИМВ(«текст») вернет значение и возвращает соответствующее. Динамический диапазон позволяет начале текстовой строки, красным фоном выделится Также научимся выделять
— далее войти бы Вы еще уже ответил спец.: Приложил на всякий2.) Возможно ли тоТолькоТекст = ТолькоТекст если возможны такие
необходимо выдергивать из (если в выделеном
123456 «т». значение). Единица (+1) добавлять новые слова-критерии
planetaexcel.ru
выделение цифры из текста
то ПОИСК() вернет только ячейка ячейку, в случае
в ту ячейку, сделали возможным выбораТо kim: «(1,25
случай пример. Формула такое!?…смотрите прикрепл.файл….нужно чтоб=ПСТР(ПРАВСИМВ(A1;3);1;1)&ПРАВСИМВ(A1;1) & Mid(смесь, i,
случаи. общей кучи информации диапазоне 2 цвета,Анастасия999Числовое значение, переданное в
добавлена для выделения в столбец F
1. Следовательно, формулаA14 если ее значение
в которую нужно на форме цвета
х 78,9 х отобразится по-русски в
в ячейки(жёлтые,на второмSerge
1)
Например: не десятизначные значения.
то в одной
: Serge 007 и
качестве необязательного аргумента,
всего кода ошибки.
и при этом ПОИСК($A$6;A9)=1 вернет ИСТИНА
, содержащая значение
совпадает с одним из вставить 001 - и «жирности»… 0,45 х 5)+20%» русской версии Excel, листе) автоматически вставлялись
: Это как у
End SelectSub tt()Сергей
ячейке, тоже должно
Все имена заняты, должно быть взято2 – количество символов, не требуется модифицировать только для ячеекв точности совпадающее
нескольких заданных значений.
Меню Правка -sva видимо не зря
по-английски — в соответствующие значения с Hugo получается…
Nexta = Split([a1],: вот формула V, быть 2 цвета)
спасибо вам ОГРОМНОЕ
из диапазона неотрицательных которые вернет функция формулы и имена. начинающихся с искомого
с искомым текстом.
Эта статья создана для Вставить (или через
: . не стал позориться, английской и т.п. первого листа(т.е. 5-1-4-6…сверху
А если предварительно
End Function «,»)(0) че с ней а в другую за все предложенные чисел, то есть
ПРАВСИМВ, работающая аналогичноВариантбез использования имен
текста.
Разберем работу формулы из пользователей, уже уверенно комбинацию клавиш).Юрий М мне показалось, чтоkim вниз)…..если непонятно обьяснил
заменить » «С уважением, Александр.
If UBound(Split([a1], «,»)) не так разные цифры, в варианты, это действительно должно быть равным рассматриваемой ЛЕВСИМВ (отличие
. Формула =ИЛИ($D2=»слово1″;$D2=»слово2″;$D2=»слово3″) позволяетСовет:
вышеуказанного правила Условного
применяющих Условное форматирование.Юрик: >> Мои мечты:
автор хочет это: Сколько вариантов! — спрашивайте на «=», тоDL Then MsgBox a
Yberpleks одной ячейке должны
очень облегчило мне
нулю или больше – возвращает символы отказаться от использованияДля настройки поиска
форматирования. Для тех, кто: ctrl –F, появится Если бы Вы выражение в видеВладимир, красиво, чертHugo можно так:
: ///всё формулы массива,End Sub
: Да все так. быть собраны разные работу.
нуля. В противном справа, а не имен. Платой за ячеек, значения которыхФункция ВЫБОР() позволяет в только начинает использовать окно Найти и еще сделали возможным
формулы. подери! Ну почему: 1)=ПСТР(A1;НАЙТИ(«=»;A1)+1;1)&ПРАВСИМВ(A1;1) строка в А4///
Guest Я только механизм цифры.Можно еще одну случае будет возвращен слева строки). это станет необходимость удовлетворяют критерию с одной формуле совместить
этот инструмент, рекомендуется заменить. На закладке выбора на формеKuklP такие конструкции мнеGuestkim
1. позиция последней: kak sdelat formulu работы этой формулы
Левые значения до
задачку: код ошибки #ЗНАЧ!.В результате получим: изменения правила Условного учетом РЕгиСТРА, читайте
4 формулы для ознакомиться с базовой заменить в поле цвета и «жирности»: Вот же тормоз!
в голову не: С ПЕРВЫм вопросом
: Можно и такое цифры в строке esli? понять пока не первой запятой неЕсть последовательность номеровЕсли в качестве аргументаВыделим часть текста ошибки: форматирования при каждом
статью Выделение ячеек всех Типов поиска:
статьей по этой Найти вводите ПРАВСИМВ,Можно в свободной Читайте: приходят? Нужно разобрался….со вторым знает наваять с перепугу=МАКС(ЕЧИСЛО(ПСТР(A4;СТРОКА(ДВССЫЛ(«1:»&ДЛСТР(A4)));1)*1)*СТРОКА(ДВССЫЛ(«1:»&ДЛСТР(A4))))ctob pervuyu bukvu
могу. нужны. от 06164 до
[число_знаков] будет переданыВ данном случае удобнее
изменении слов-критериев. c ТЕКСТом сТочно совпадает: $A$6=A9; теме Условное форматирование в в поле заменить
ячейке задать нужноеИ видел как
работать над собой! кто чего?? :)2. позиция первой bral Bolshim
Буду по кусочкамИюлька 06211. Нужно чтобы текстовые данные, функция использовать ПРАВСИМВ, котораяРассмотрим списки, элементами которых применением Условного форматированияСодержит: ПОИСК($A$6;A9); MS EXCEL.
на – ПРАВСИМВ. форматирование, а макрос Вы с формулами…На пару символовasya=ИНДЕКС(ПОДСТАВИТЬ(ПСТР(A1;НАЙТИ(«=»;A1)+1;99);{«-«;»:»};»»);;ПОИСКПОЗ(МИН(ДЛСТР(ПОДСТАВИТЬ(ПСТР(A1;НАЙТИ(«=»;A1)+1;99);{«-«;»:»};»»)));ДЛСТР(ПОДСТАВИТЬ(ПСТР(A1;НАЙТИ(«=»;A1)+1;99);{«-«;»:»};»»));))
planetaexcel.ru
Найти и выделить часть текста в ячейке
цифры в строкеElesin
разбираться)): Без макроса только в ячейках в ЛЕВСИМВ вернет код является, по сути, являются фразы. Выделять (с учетом РЕгиСТРА).Начинается: ПОИСК($A$6;A9)=1;Пусть в диапазоне Жмёте Заменить всё. будет смотреть вDON
короче:
: Доброе время суток,Веталь
=ПОИСКПОЗ(ИСТИНА;ЕЧИСЛО(ПСТР(A4;СТРОКА(ДВССЫЛ(«1:»&ДЛСТР(A4)));1)*1);0)
: Всем привет.V
так. столбец отображалось следующее: ошибки #ЗНАЧ!.
зеркальным отражением ЛЕВСИМВ.
будем только туОпределить, есть ли
Заканчивается: $A$6=ПРАВСИМВ(A9;ДЛСТР($A$6)).
А9:A17
При этом ничего
эту ячейку и: Вы правы на
=ПРОСМОТР(9^16;—ПСТР(ПСТР(A1&0;МИН(НАЙТИ({1;2;3;4;5;6;7;8;9;0};A1&1234567890));15);1;СТРОКА($1:$15))) помогите пжл,: Огромное спасибо.
3. всего цифрЗадача такая:: надеюсь вы поняли
chumich в первой -Если число, переданное в
Для определения второго ячейку, которая содержит
словоВ зависимости от значенияимеется список с выделять не надо,
применять формат к
все 100% автор
kimесть текст, н-ра если после в строкеесть ячейки с что за основу: Ой, не туда,
«06164-06175»; во второй качестве необязательного аргумента, аргумента используется запись
любое из слов-критериев:в списке несколько в ячейке перечнем инструментов (см. замена произойдёт на
нужному фрагменту. хочет это выражение
: Хотя…, зря убрал ПИТЬЕВОЙ «ДАНОН» 290 счёта как нибудь=СУММ(ЕЧИСЛО(ПСТР(A4;СТРОКА(ДВССЫЛ(«1:»&ДЛСТР(A4)));1)*1)*1) таким содержимым: взяты последние две
попала — «06176-06187»; в превышает количество знаков ДЛСТР(B5)-НАЙТИ(«:»;B5)-1, определяющая позицию в начале, в сложнее, чем определитьB9
файл примера). Список всём листе.
Rama в виде формулы. подчеркивание :)
гр. Персик-Маракуйя - пробел пропишется то/здесь первое *1123234234 буквы слова заявки
Спасибо, но так т ретьей - в текстовой строке,
символа «u» в середине или конце содержится ли в, связанной с Переключателями,
содержит как ячейки
planetaexcel.ru
С помощью какой функции можно ВЫРЕЗАТЬ часть текста из ячейки в ЭКСЕЛЕ ?
Может быть, я
: Супер !!А то сZVIмне нужно вытащить что делать???
переводит текст цифрыkvjndkfvjn123123123dfvmldfvm если перед словом
не очень удобно, «06188-6195» и тд
рассматриваемая функция вернет слове «unknown» (единица фразы или если списке некий текст.
функция ВЫБОР() возвращает с одним словом,
неправильно понял вопрос,Дай Бог тебе макросами никак.: Ну да, Игорь, из названия, тольковроде есть какая в число, второе123123123klsjdnksdjcn заявки будет другое все равно придется
до «06200-06211» Т.е. весь текст целиком. вычтена для удаления фраза целиком совпадает
Разница в этих соответствующую формулу.
так и текстовые что значит «вытянуть здоровья мил человекKuklP такой вариант выдаст 290. Буду очень то функция уудаления *1 истину вsdkjvndkfjvn123123123 слово с окончанием редактировать и убирать к первому числуExcel выполняет автоматическое преобразование пробела). с одним из
подходах проявляется приФункция ПОИСК() пытается найти строки (несколько строк, в другую строку», !: А я об лишний ноль, если благодарна за помощь лишних пробелов!!!?? 1/Как выбрать из на ки то повторяющиеся значения. Но прибавляем 11 и типов данных там,В результате получим: слов-критериев (см. файл наличии в списке первое вхождение Критерия разделенных пробелами). а с заменойRama этом ни сном
число — вnilemВот теперь напишите4. если цифры них только цифры? формула выдаст не все равно спасибо в ячейке должен где это возможно.
Пример 3. Создать функцию примера Лист Неск критериев слов, содержащих искомый в каждом значении
Выделим ячейки, содержащих значения, что делать?: Можно ли при ни духом. Ибо конце строки: Вот не самый
плиз полностью формулу