Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Как выписать последнее слово после косой черты
 
#1
31.10.2014 01:48:31
C:\Windows\apppatch\AcGenral.dll
C:\Windows\debug\WIA\wiatrace.log
C:\Program Files\Microsoft SQL Server\110\Shared\Resources\1033\sqlevn70.rll
C:\Program Files (x86)\Cisco Packet Tracer 5.3.1\extensions\ptaplayer\ptaplayer-014.02.jar
Помогите выписать последнее слово, именно  название в конце с расширение.

Спасибо)
 
 
 
#2
31.10.2014 01:51:52
Куда выписать?
Код
Sub ddd()
t = "C:\Program Files\Microsoft SQL Server\110\Shared\Resources\1033\sqlevn70.rll"
MsgBox Split(t, "\")(UBound(Split(t, "\")))
End Sub
 
 
 
#3
31.10.2014 01:53:14
Это все как бы в а1, а выписать в А2
Изменено: Andrushka - 31.10.2014 01:55:25
 
 
 
#4
31.10.2014 02:04:57
Split формулой  :)
=СЖПРОБЕЛЫ(ПРАВБ(ПОДСТАВИТЬ(A1;"";ПОВТОР(" ";50));30))
Если на звание файла и расширение имеют больше 30 символов  :)  , измените последнее число
 
 
 
#5
31.10.2014 02:22:46
Спасибо большое!
 
 
 
#6
31.10.2014 06:56:33
Еще вариант, независимо от длины строки (единственное условие строка не должна содержать символ "*", если содержит, то в формуле этот символ нужно заменить на любой другой, которого нет в А1:
Код
=ПСТР(A1;НАЙТИ("*";ПОДСТАВИТЬ(A1;"\";"*";ДЛСТР(A1)-ДЛСТР(ПОДСТАВИТЬ(A1;"\";""))))+1;ДЛСТР(A1))
Почему-то формула оформленная в виде кода не пишет знак "\", добавляю формулу в виде текста:
=ПСТР(A1;НАЙТИ("*";ПОДСТАВИТЬ(A1;"\";"*";ДЛСТР(A1)-ДЛСТР(ПОДСТАВИТЬ(A1;"\";""))))+1;ДЛСТР(A1))
Изменено: GeorgeDark - 31.10.2014 06:59:01
 
 
 
#7
31.10.2014 09:53:10
Или UDF от k61 (текстом и кодом):

Function hvost®
   hvost = Split(r, "\"  ;)  (UBound(Split(r, "\"  ;)  ))
End Function


Код
Function hvost(r)
    hvost = Split(r, "\")(UBound(Split(r, "\")))
End Function
Изменено: Hugo - 31.10.2014 09:54:19
 
 
 
#8
12.09.2024 15:41:17
Уважаемые ГУРУ, очень нужна ваша помощь.
У меня задача похожая, но только у меня прайс запасных частей и в прайсе на некоторых позициях указан поставщик или бренд после " /" (пробел+/),
а на тех позициях где нету " /", нужно получить пустое значение
вот так я смог формулу модернизировать:
Код
=ЕСЛИОШИБКА(ПСТР(RC[-1];НАЙТИ("@";ПОДСТАВИТЬ(RC[-1];"/";"@";ДЛСТР(RC[-1])-ДЛСТР(ПОДСТАВИТЬ(RC[-1];"/";""))))+1;ДЛСТР(RC[-1]));"")
но эта формула не работает корректно если в ней прописать пробел со слэшэм " /", т.к. на некоторых товарах встречаются слэши в наименовании например: А/камера и формула выше возвращает мне всё после слэша.
А мне нужно получить всё после пробела со слэшэм (желательно чтобы вытягивался и сам слэш тоже, но это не обязательно) в остальных случаях: ""
Приложил файл на всякий случай
Помогите пожалуйста.
Изменено: AndreiSMT - 12.09.2024 15:44:14
 
 
 
#9
12.09.2024 16:35:04
Добрый день
Код
=ЕСЛИ(ДЛСТР(B3)-ДЛСТР(ПОДСТАВИТЬ(B3;" /";""))>0;СЖПРОБЕЛЫ(ПРАВСИМВ(ПОДСТАВИТЬ(B3;" /";ПОВТОР(" ";ДЛСТР(B3))&"/");ДЛСТР(B3)));"")
 
 
 
#10
12.09.2024 16:44:21
Код
=ЕСЛИОШИБКА(ПСТР(RC[-2];ПОИСК(" /";RC[-2])+2;99);"")
 
 
 
#11
13.09.2024 07:09:44
Я и не сомневался что мне тут помогут.
Уважаемые webley, и V, спасибо вам большое!
Обе формулы работают.
Правда буду использовать формулу от webley, хотя она и более длинная, но с ней слэш добавляется.  :)

Еще раз благодарю от всей души. Спасибо большое!
 
 
 
#12
13.09.2024 08:03:01
Цитата
AndreiSMT написал:
но с ней слэш добавляется.
ну замените +2 на +1.
П.с. эта формула будет работать если слеш один (как в примере).
Изменено: V - 13.09.2024 08:10:37
 
 
 
#13
13.09.2024 08:51:15
V, точно, работает!
Я благодаря вам, нашёл в нашей базе 1С несколько ошибок.
Теперь у меня родилась ещё одна идея, найти другие ошибки в наименованиях...
Бухгалтерию руководство озадачило чтобы они во время постановки на приход, вводили в конце наименований бренд или производителя таким образом:
Наименование + пробел + слэш + бренд, но в бухгалтерии работают люди, которым свойственно ошибаться и они могут поставить слэш без пробела перед ним или после слэша поставить пробел.
Вобщем теперь нужна ваша помощь с формулой, которая бы исключала все правильные варианты, а ошибки бы отображала.
Я попробовал искать так: ?/?, но так находятся и пробелы тоже.
Помогите пожалуйста, если такое возможно и это не сложно.
 
 
 
#14
13.09.2024 10:05:47
Цитата
AndreiSMT написал:
Помогите пожалуйста, если такое возможно и это не сложно.
Покажите в примере как должен что именно нужно. А то сейчас не очень понятно.
 
 
 
#15
13.09.2024 10:10:11
Цитата
AndreiSMT написал:
Теперь у меня родилась ещё одна идея, найти другие ошибки в наименованиях...
Один вопрос - одна тема. Не нужно все возникающие 'идеи' валить в одну кучу тему.
Продумайте задачу, сформулируйте название для темы, описание, приложите файл-пример. Как есть - Как надо. В отдельной теме
Согласие есть продукт при полном непротивлении сторон
 
 
 
#16
13.09.2024 10:58:39
Цитата
Andrushka написал:
Помогите выписать последнее слово, именно  название в конце с расширение.
Код
=ФИЛЬТР.XML("<t><s>"&ПОДСТАВИТЬ(A1;"\";"</s><s>")&"</s></t>";"//s[last()]")
 
 
 
#17
13.09.2024 13:33:37
вариант:
="/"&СЖПРОБЕЛЫ(ПРАВБ(ПОДСТАВИТЬ(B3;"/";ПОВТОР(" ";99));99))
 
 
 
#18
13.09.2024 14:42:09
Мистер Экселистор, Поиск строк с ошибкой

Sanja, согласен, виноват, прошу прощения. Создал новую тему.
 
 
 
Страницы: 1
Наверх