Страницы: 1
RSS
Вытащить артикула из строк
 
Добрый день.
Есть большой массив данных в виде строк, требуется вытащить артикул (выделил красным).
Просьба помочь, заранее большое спасибо.
 
Код
=-ФИЛЬТР.XML("<j><i>"&ПОДСТАВИТЬ(A2;СИМВОЛ(10);"</i><i>")&"</i></j>";"//i[2]")
 
Код
=ПСТР(A2;8;7)
 
Здравствуйте.
Вариант:
Код
=ПСТР(A2;ПОИСК("(";A2)+1;7)
 
PQ
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"Строка", type text}}),
    #"Duplicated Column" = Table.DuplicateColumn(#"Changed Type", "Строка", "Строка - Copy"),
    #"Split Column by Delimiter" = Table.SplitColumn(#"Duplicated Column","Строка - Copy",Splitter.SplitTextByDelimiter("(", QuoteStyle.Csv),{"Строка - Copy.1", "Строка - Copy.2", "Строка - Copy.3"}),
    #"Changed Type1" = Table.TransformColumnTypes(#"Split Column by Delimiter",{{"Строка - Copy.1", type text}, {"Строка - Copy.2", type text}, {"Строка - Copy.3", type text}}),
    #"Removed Columns" = Table.RemoveColumns(#"Changed Type1",{"Строка - Copy.3", "Строка - Copy.1"}),
    #"Replaced Value" = Table.ReplaceValue(#"Removed Columns",")","",Replacer.ReplaceText,{"Строка - Copy.2"}),
    #"Removed Columns1" = Table.RemoveColumns(#"Replaced Value",{"Строка"}),
    #"Renamed Columns" = Table.RenameColumns(#"Removed Columns1",{{"Строка - Copy.2", "Артикул"}})
in
    #"Renamed Columns"
Изменено: jakim - 14.02.2022 18:47:57
 
ещё вариант пользовательской функцией (см. столбец В):
Код
Function RegExExecute(what, Optional ByVal pattern = "\d{7}")
    With CreateObject("VBScript.Regexp")
        .Global = False
        .MultiLine = True
        .pattern = pattern
        RegExExecute = .Execute(what)(0)
    End With
End Function
Изменено: artemkau88 - 14.02.2022 20:12:27
 
В B2 5595833
и
По вопросам из тем форума, личку не читаю.
 
Если не понятно у БМВ, то ТУТ более подробно
Изменено: Msi2102 - 14.02.2022 20:07:07
 
Спасибо всем огромное!  
Страницы: 1
Наверх