Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Выбрать из ячеек значения между "=" и "кг" - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Выбрать из ячеек значения между "=" и "кг" (Макросы/Sub)
Выбрать из ячеек значения между "=" и "кг"
Yar4i Дата: Воскресенье, 06.12.2020, 06:17 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 131
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день, дамы и господа :D

Столкнулся с задачей, которую решил через формулы, однако хочется на будущее иметь решение и через макрос.
В столбце А находятся данные, и нужно выбрать все значения между "=" и "кг". В данном случае искомые значения это числа с сотыми.

Ввиду того, что возможны опечатки (такие как в ячейке А1 - "г" вместо "кг"), то важно разместить выделенные-найденные значения в соседних столбцах B. C. D. E ...
Например в ячейке А1 будет найдено лишь одно значение и размещено в столбце В в соответствующей 1ой строке.

Пример до и после приложил.
Также приложил решение с помощью формул - может быть кому-то и я буду полезен.
К сообщению приложен файл: 121212.xlsx(17.2 Kb)


Сообщение отредактировал Yar4i - Воскресенье, 06.12.2020, 06:18
 
Ответить
СообщениеДобрый день, дамы и господа :D

Столкнулся с задачей, которую решил через формулы, однако хочется на будущее иметь решение и через макрос.
В столбце А находятся данные, и нужно выбрать все значения между "=" и "кг". В данном случае искомые значения это числа с сотыми.

Ввиду того, что возможны опечатки (такие как в ячейке А1 - "г" вместо "кг"), то важно разместить выделенные-найденные значения в соседних столбцах B. C. D. E ...
Например в ячейке А1 будет найдено лишь одно значение и размещено в столбце В в соответствующей 1ой строке.

Пример до и после приложил.
Также приложил решение с помощью формул - может быть кому-то и я буду полезен.

Автор - Yar4i
Дата добавления - 06.12.2020 в 06:17
Kuzmich Дата: Воскресенье, 06.12.2020, 11:47 | Сообщение № 2
Группа: Проверенные
Ранг: Ветеран
Сообщений: 560
Репутация: 111 ±
Замечаний: 0% ±

Excel 2003
Цитата
иметь решение и через макрос

UDF для первого значения веса
[vba]
Код
Function iWes(cell$)
With CreateObject("VBScript.RegExp")
     .Global = True
     .Pattern = "m=\s?(\d+,\d{2})(?=г|кг)"
   If .test(cell) Then
     iWes = .Execute(cell)(0).SubMatches(0)
   Else
     iWes = ""
   End If
End With
End Function
[/vba]
 
Ответить
Сообщение
Цитата
иметь решение и через макрос

UDF для первого значения веса
[vba]
Код
Function iWes(cell$)
With CreateObject("VBScript.RegExp")
     .Global = True
     .Pattern = "m=\s?(\d+,\d{2})(?=г|кг)"
   If .test(cell) Then
     iWes = .Execute(cell)(0).SubMatches(0)
   Else
     iWes = ""
   End If
End With
End Function
[/vba]

Автор - Kuzmich
Дата добавления - 06.12.2020 в 11:47
doober Дата: Воскресенье, 06.12.2020, 11:48 | Сообщение № 3
Группа: Друзья
Ранг: Ветеран
Сообщений: 694
Репутация: 260 ±
Замечаний: 0% ±

Excel 2010
Здравствуйте.
Решение через макрос, два варианта, с количеством и без.
Во второй строке применение udf формулой массива
К сообщению приложен файл: 121212.xlsm(28.2 Kb)


 
Ответить
СообщениеЗдравствуйте.
Решение через макрос, два варианта, с количеством и без.
Во второй строке применение udf формулой массива

Автор - doober
Дата добавления - 06.12.2020 в 11:48
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Выбрать из ячеек значения между "=" и "кг" (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс цитирования Jobsora jooble
© 2010-2021 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!