Скопировать определенную часть данных из одной ячейки в другую.

Пользователь

Сообщений: 5 Регистрация: 14.02.2025

14.02.2025 13:34:05

Добрый день! Помогите, пожалуйста, с такой задачей. Имеется столбец с набором подобных данных:
6Б1ОС3ДН
5С1ДН2Б2ОС
4Б4ОС2С
8ОС2Б
10ДН+Б
10Б+С
Из него необходимо достать левые символы, а именно первые цифру/число и букву/буквы. То есть в итоге должно получится так:
6Б
5С
4Б
8ОС
10ДН
10Б
Как это можно реализовать простым путем?

Hugo Пользователь Сообщений: 26367 Регистрация: 22.12.2012	#2 14.02.2025 13:42:14 UDF легко написать, используете? Изменено: Hugo - 14.02.2025 13:46:40

АнтуанЭ Пользователь Сообщений: 5 Регистрация: 14.02.2025	#3 14.02.2025 13:43:23 Нет, там 8 ос

МатросНаЗебре

Пользователь

Сообщений: 8401 Регистрация: 05.02.2014

14.02.2025 13:43:32

Код

=ЛЕВСИМВ(A1;НАЙТИ(СЖПРОБЕЛЫ(ЛЕВСИМВ(ПОДСТАВИТЬ(СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(A1;0;" ");1;" ");2;" ");3;" ");4;" ");5;" ");6;" ");7;" ");8;" ");9;" ");"+";" "));" ";ПОВТОР(" ";10));10));A1)+ДЛСТР(СЖПРОБЕЛЫ(ЛЕВСИМВ(ПОДСТАВИТЬ(СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(A1;0;" ");1;" ");2;" ");3;" ");4;" ");5;" ");6;" ");7;" ");8;" ");9;" ");"+";" "));" ";ПОВТОР(" ";10));10)))-1)

_Boroda_

Пользователь

Сообщений: 1657 Регистрация: 27.07.2013

Контакты см. в профиле

14.02.2025 14:25:32

Массивная

Код
=ЛЕВБ(A1;АГРЕГАТ(15;6;СТРОКА($1:$9)/ЕЧИСЛО(-(ПСТР(A1;СТРОКА($1:$9);1)&0));ПОИСКПОЗ(0=0;ЕОШ(-ПСТР(A1;1;СТРОКА($1:$9)));))-1)

Обычная

Код
=ЛЕВБ(A1;АГРЕГАТ(15;6;СТРОКА($1:$9)/ЕЧИСЛО(-(ПСТР(A1;СТРОКА($1:$9);1)&0));АГРЕГАТ(15;6;СТРОКА($1:$9)/ЕОШ(-ПСТР(A1;1;СТРОКА($1:$9)));1))-1)

Прикрепленные файлы

Книга7554.xlsm (9.4 КБ)

Скажи мне, кудесник, любимец ба’гов...

АнтуанЭ Пользователь Сообщений: 5 Регистрация: 14.02.2025	#6 14.02.2025 14:27:17 МатросНаЗебре, спасибо, работает!

АнтуанЭ Пользователь Сообщений: 5 Регистрация: 14.02.2025	#7 14.02.2025 14:28:41 _Boroda_, И Вам спасибо!

sotnikov

Пользователь

Сообщений: 558 Регистрация: 29.01.2016

14.02.2025 15:15:47

pq
let from = Excel.CurrentWorkbook(){[Name="rez"]}[Content][[w]], f=each Splitter.SplitTextByCharacterTransition(g,h)([w]){0}, g=(x)=>List.Contains(txt,x),h=(x)=>not List.Contains(txt,x), txt=List.Buffer({"А".."Я"}),to=Table.AddColumn(from,"cut",f) in to

Прикрепленные файлы

cut.xlsx (16.63 КБ)

Павел \Ʌ/ Пользователь Сообщений: 3119 Регистрация: 09.01.2023 excel 2007, 2016, 2021	#9 14.02.2025 15:26:54 чуть пошаманил с формулой от _Boroda_ =ЛЕВБ(A1;АГРЕГАТ(15;6;СТРОКА($1:$9)/ЕЧИСЛО((ПСТР(A1;СТРОКА($1:$9);1)&1)/ЕОШ(-ПСТР(A1;1;СТРОКА($1:$9))));1)-1)

Hugo

Пользователь

Сообщений: 26367 Регистрация: 22.12.2012

#10

14.02.2025 16:12:08

UDF

Код
=izvl(A1;"0123456789+")

код

Изменено: Hugo - 14.02.2025 16:14:37 (чуть сократил код)

АнтуанЭ

Пользователь

Сообщений: 5 Регистрация: 14.02.2025

#11

03.07.2025 15:44:25

Всем спасибо, кто раннее отвечал. Немного расширю вопрос. Теперь из подобных данных надо достать все сцепки цифра/число и буква/буквы в разные строки. На примере 6Б1ОС3ДН, должно выглядеть так:
6Б1ОС3ДН 6Б
1ОС
3ДН
Знак плюс рассматривать как число или цифру. В примере 10ДН+Б, должно выйти:
10ДН+Б 10ДН
+Б
Реально ли это сделать? При чем количество таких сцепок может быть разным, от 1 до 10. Вот пример, как должно выглядеть. В идеале, если еще цифры будут в одном столбце, а буквы в другом. Спасибо всем неравнодушным!)

7ОС2Б1КЛ	7ОС
	2Б
	1КЛ

7ОС2Б1КЛ+Я	7	ОС
	2	Б
	1	КЛ
	+	Я

Читают тему