Выбрать нужные данные из текста
Chelovekov
Дата: Вторник, 15.01.2019, 14:23 |
Сообщение № 1
Группа: Проверенные
Ранг: Обитатель
Сообщений: 315
Репутация:
0
±
Замечаний:
80% ±
Excel 2016
Здравствуйте, гуры Екселя !!! Помогите пожалуйста, составить формулу, что бы выбрать из O:197.5 0.86 число 197.5. Заранее благодарен.
Здравствуйте, гуры Екселя !!! Помогите пожалуйста, составить формулу, что бы выбрать из O:197.5 0.86 число 197.5. Заранее благодарен. Chelovekov
Ответить
Сообщение Здравствуйте, гуры Екселя !!! Помогите пожалуйста, составить формулу, что бы выбрать из O:197.5 0.86 число 197.5. Заранее благодарен. Автор - Chelovekov Дата добавления - 15.01.2019 в 14:23
vikttur
Дата: Вторник, 15.01.2019, 14:27 |
Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2941
Код
=ПСТР("O:197.5 0.86";3;5)
Если нужно число в русской локали, нужно еще менять точку на запятую. Если нужно извлекать из других строк, вместо текста подставить в формулу ссылку на ячейку. Если возможны другие форматы текстов, покажите в файле пример данных и результата.
Код
=ПСТР("O:197.5 0.86";3;5)
Если нужно число в русской локали, нужно еще менять точку на запятую. Если нужно извлекать из других строк, вместо текста подставить в формулу ссылку на ячейку. Если возможны другие форматы текстов, покажите в файле пример данных и результата.vikttur
Ответить
Сообщение Код
=ПСТР("O:197.5 0.86";3;5)
Если нужно число в русской локали, нужно еще менять точку на запятую. Если нужно извлекать из других строк, вместо текста подставить в формулу ссылку на ячейку. Если возможны другие форматы текстов, покажите в файле пример данных и результата.Автор - vikttur Дата добавления - 15.01.2019 в 14:27
Chelovekov
Дата: Вторник, 15.01.2019, 14:32 |
Сообщение № 3
Группа: Проверенные
Ранг: Обитатель
Сообщений: 315
Репутация:
0
±
Замечаний:
80% ±
Excel 2016
Огромное спасибо
Ответить
Сообщение Огромное спасибо Автор - Chelovekov Дата добавления - 15.01.2019 в 14:32
_Boroda_
Дата: Вторник, 15.01.2019, 14:37 |
Сообщение № 4
Группа: Админы
Ранг: Местный житель
Сообщений: 16892
Репутация:
6611
±
Замечаний:
±
2003; 2007; 2010; 2013 RUS
В общем случаеКод
=--ПОДСТАВИТЬ(ПСТР(ЛЕВБ(A1;ПОИСК(" ";A1)-1);ПОИСК(":";A1)+1;9);".";",")
В общем случаеКод
=--ПОДСТАВИТЬ(ПСТР(ЛЕВБ(A1;ПОИСК(" ";A1)-1);ПОИСК(":";A1)+1;9);".";",")
_Boroda_
Скажи мне, кудесник, любимец ба’гов... Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
Ответить
Сообщение В общем случаеКод
=--ПОДСТАВИТЬ(ПСТР(ЛЕВБ(A1;ПОИСК(" ";A1)-1);ПОИСК(":";A1)+1;9);".";",")
Автор - _Boroda_ Дата добавления - 15.01.2019 в 14:37
sv2014
Дата: Среда, 16.01.2019, 08:07 |
Сообщение № 5
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 226
Репутация:
61
±
Замечаний:
0% ±
Excel 2013
Chelovekov , вариант UDF в C1 и формула [vba]Код
Function aa#(t$) With CreateObject("VBScript.RegExp"): .Pattern = "\d+.\d+" aa = Replace(.Execute(t)(0), ".", ",") End With End Function
[/vba] [vba]Код
=СЖПРОБЕЛЫ(ПРАВБ(ПОДСТАВИТЬ(ЛЕВБ(A$1;ПОИСК(" ";$A$1)-1);":";ПОВТОР(" ";99));99))
[/vba]
Chelovekov , вариант UDF в C1 и формула [vba]Код
Function aa#(t$) With CreateObject("VBScript.RegExp"): .Pattern = "\d+.\d+" aa = Replace(.Execute(t)(0), ".", ",") End With End Function
[/vba] [vba]Код
=СЖПРОБЕЛЫ(ПРАВБ(ПОДСТАВИТЬ(ЛЕВБ(A$1;ПОИСК(" ";$A$1)-1);":";ПОВТОР(" ";99));99))
[/vba]sv2014
Сообщение отредактировал sv2014 - Среда, 16.01.2019, 12:14
Ответить
Сообщение Chelovekov , вариант UDF в C1 и формула [vba]Код
Function aa#(t$) With CreateObject("VBScript.RegExp"): .Pattern = "\d+.\d+" aa = Replace(.Execute(t)(0), ".", ",") End With End Function
[/vba] [vba]Код
=СЖПРОБЕЛЫ(ПРАВБ(ПОДСТАВИТЬ(ЛЕВБ(A$1;ПОИСК(" ";$A$1)-1);":";ПОВТОР(" ";99));99))
[/vba]Автор - sv2014 Дата добавления - 16.01.2019 в 08:07