Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Найти все, что между слешами
 
#1
23.12.2017 18:20:19
использую формулу такую
Код
=ЕСЛИ(ДЛСТР(ПОДСТАВИТЬ(ПСТР(B1;ПОИСК("/";B1);3);"/";""))=1;"су "&ПОДСТАВИТЬ(ПСТР(B1;ПОИСК("/";B1);3);"/";"");"су"&ПОДСТАВИТЬ(ПСТР(B1;ПОИСК("/";B1);3);"/";""))
как ее упростить, может есть варианты?

1. то есть если длина между слешами без слешов = 1 ставим пробел после "су ", если более 1 тогда без пробела "су"
2. нужны только то что между слешами
/3/ =3
/11/ =11
3. соединить 1 и 2
02-0012/3/2017су 3
02-0012/11/2017су11
Изменено: Goldenito - 23.12.2017 20:08:58
 
 
 
#2
23.12.2017 18:34:54
Цитата
Goldenito написал:
как ее упростить, может есть варианты?
А зачем?
Если в мире всё бессмысленно, — сказала Алиса, — что мешает выдумать какой-нибудь смысл? ©Льюис Кэрролл
 
 
 
#3
23.12.2017 18:35:57
я думаю у меня неграмотно получилось с этой формулой
 
 
 
#4
23.12.2017 19:13:34
А файл-пример будет? Как есть-Как надо. И различных вариантов исходных данных не жалейте
Согласие есть продукт при полном непротивлении сторон
 
 
 
#5
23.12.2017 19:23:52
файл прикрепил
последнее что я придумал это вот, но она после слеша только берет все а надо до следующего слеша
=ПСТР(B1;ПОИСК("/";B1)+1;3)
Изменено: Goldenito - 23.12.2017 23:46:21
 
 
 
#6
23.12.2017 19:46:50
Goldenito,
А между слешами всегда цифры?
Почему в первой ячейке, где 02-0012/3/20 должно быть су3?
 
 
 
#7
23.12.2017 19:51:55
Цитата
Kuzmich написал: А между слешами всегда цифры?
да всегда
должно быть су 3 с пробелом, а все что начинается с су10 без пробела/ для того чтобы сортировка прошла успешно, а то получается что когда они с пробелами все, су 1,2,3 и т.д в таком порядке
су 1
су 10
су 11
су 2
су 3
такая странная сортировка
так выходит у меня

последняя моя формула вышла такая
=ЕСЛИ(ДЛСТР(ПОДСТАВИТЬ(ПСТР(B1;ПОИСК("/";B1);3);"/";""))=1;"су "&ПОДСТАВИТЬ(ПСТР(B1;ПОИСК("/";B1);3);"/";"");"су"&ПОДСТАВИТЬ(ПСТР(B1;ПОИСК("/";B1);3);"/";""))

но если между слешами более двух знаков, то он оставляет только два
Изменено: Goldenito - 23.12.2017 23:46:51
 
 
 
#8
23.12.2017 19:57:09
Цитата
должно быть су 3 с пробелом
У вас вроде было ограничение на длину в 14 символов
 
 
 
#9
23.12.2017 20:04:12
Цитата
Kuzmich написал:
ограничение
ограничение здесь не прошло, в других случаях это непрокатило
 
 
 
#10
23.12.2017 20:11:13
Я так понял, что вам нужно вытащить цифры между слешами, чтобы потом произвести сортировку по этим цифрам по возрастанию.
Тогда лучше делать
су001
су017
су111
 
 
 
#11
23.12.2017 20:17:27
Цитата
Kuzmich написал:
Тогда лучше делать
су001
су017
су111
в этом та и фишка. что так мне нельзя делать, то есть там должно быть прописано без нулей
Изменено: Goldenito - 23.12.2017 20:17:52
 
 
 
#12
23.12.2017 20:23:25
Цитата
там должно быть прописано без нулей
для сортировки нули не помешают
Если у вас максимальное количество цифр между слешами =3,
то для правильной сортировки вам нужно добавлять два пробела, если одна цифра
и один пробел, если две цифры
 
 
 
#13
23.12.2017 20:32:47
Kuzmich,за это спасибо
да =3
как решить основную проблему то
 
 
 
#14
23.12.2017 20:37:43
UDF
Код
Function iSlesh(cell As String) As String
 With CreateObject("VBScript.RegExp")
     .Global = True
     .IgnoreCase = True
     .Pattern = "/\d{1,3}(?=/)"
     If Len(.Execute(cell)(0)) = 2 Then
       iSlesh = "су  " & Mid(.Execute(cell)(0), 2)
     ElseIf Len(.Execute(cell)(0)) = 3 Then
       iSlesh = "су " & Mid(.Execute(cell)(0), 2)
     ElseIf Len(.Execute(cell)(0)) = 4 Then
       iSlesh = "су" & Mid(.Execute(cell)(0), 2)
     End If
 End With
End Function
 
 
 
#15
23.12.2017 20:49:54
Kuzmich, спасибо, идеально получилось, если там будет больше 3, что мне изменить
 
 
 
#16
23.12.2017 20:52:01
Цитата
если там будет больше 3, что мне изменить
А сколько цифр может быть максимально?
 
 
 
#17
23.12.2017 20:54:04
Kuzmich, 5
нашел спасибо
.Pattern = "/\d{1,300}(?=/)"
Изменено: Goldenito - 23.12.2017 20:58:32
 
 
 
#18
23.12.2017 20:59:52
Что, 300 цифр может быть?
 
 
 
#19
23.12.2017 21:00:56
Kuzmich, да это я так, для эксперимента)
спасибо огромное
 
 
 
#20
23.12.2017 21:05:26
Если цифр будет 5, то
Код
.Pattern = "/\d{1,5}(?=/)"
и добавить еще условия для
одна цифра - добавляем 4 пробела
две цифры - добавляем 3 пробела
три цифры - добавляем 2 пробела
четыре цифры - добавляем 1 пробел
 
 
 
#21
23.12.2017 21:07:44
Цитата
Kuzmich написал:
4 пробела
да это все схвачено, спасибо понял
 
 
 
#22
23.12.2017 23:54:39
Плучить число:
=--ПСТР(ПОДСТАВИТЬ(B1;"/";ПОВТОР(" ";50));50;50)
Получить текст:
=СЖПРОБЕЛЫ(ПСТР(ПОДСТАВИТЬ(B1;"/";ПОВТОР(" ";50));50;50))
Слева добавляйте, что хотите: су, лису, колбасу :)
 
 
 
#23
24.12.2017 14:57:25
vikttur, спасибо
 
 
 
Страницы: 1
Наверх