Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Удаление значение до третьего пробела с конца значения. - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Удаление значение до третьего пробела с конца значения. (Иное/Other)
Удаление значение до третьего пробела с конца значения.
valermihali4 Дата: Среда, 30.09.2015, 09:52 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 37
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007
Доброго дня.
Подскажите пжлста как удалить значение до третьего пробела с конца значения.
Пример: есть 735312.001-04 Дверь 160 160 44.0
должно остаться 160 160 44.0
Спасибо .


Сообщение отредактировал valermihali4 - Среда, 30.09.2015, 09:56
 
Ответить
СообщениеДоброго дня.
Подскажите пжлста как удалить значение до третьего пробела с конца значения.
Пример: есть 735312.001-04 Дверь 160 160 44.0
должно остаться 160 160 44.0
Спасибо .

Автор - valermihali4
Дата добавления - 30.09.2015 в 09:52
Anton1013 Дата: Среда, 30.09.2015, 10:00 | Сообщение № 2
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 203
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Если текст до нужного значения всегда одинаковый, то можно попробовать функцию ПСТР.
А вообще желателен пример


Никогда не поздно научиться!
 
Ответить
СообщениеЕсли текст до нужного значения всегда одинаковый, то можно попробовать функцию ПСТР.
А вообще желателен пример

Автор - Anton1013
Дата добавления - 30.09.2015 в 10:00
valermihali4 Дата: Среда, 30.09.2015, 10:04 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 37
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007
Если текст до нужного значения всегда одинаковый, то можно попробовать функцию ПСТР.
А вообще желателен пример

К сожалению длинна текста разная.
Пример:
745427.361-v2 Боковая стенка СС 20 20 70.0
745427.361-p4-v2 Боковая стенка СС 20 20 70.0
745427.362-v2 Перемычка вертикальная СС 80 80 29.2


Сообщение отредактировал valermihali4 - Среда, 30.09.2015, 10:05
 
Ответить
Сообщение
Если текст до нужного значения всегда одинаковый, то можно попробовать функцию ПСТР.
А вообще желателен пример

К сожалению длинна текста разная.
Пример:
745427.361-v2 Боковая стенка СС 20 20 70.0
745427.361-p4-v2 Боковая стенка СС 20 20 70.0
745427.362-v2 Перемычка вертикальная СС 80 80 29.2

Автор - valermihali4
Дата добавления - 30.09.2015 в 10:04
YouGreed Дата: Среда, 30.09.2015, 10:06 | Сообщение № 4
Группа: Проверенные
Ранг: Ветеран
Сообщений: 589
Репутация: 123 ±
Замечаний: 0% ±

Excel 2010
valermihali4, Конкретно под этот пример
Код
=ПРАВСИМВ(B15;ДЛСТР(B15)-(НАЙТИ("СС ";B15;1)+2))


Сообщение отредактировал YouGreed - Среда, 30.09.2015, 10:07
 
Ответить
Сообщениеvalermihali4, Конкретно под этот пример
Код
=ПРАВСИМВ(B15;ДЛСТР(B15)-(НАЙТИ("СС ";B15;1)+2))

Автор - YouGreed
Дата добавления - 30.09.2015 в 10:06
valermihali4 Дата: Среда, 30.09.2015, 10:09 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 37
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007
=ПРАВСИМВ(B15;ДЛСТР(B15)-(НАЙТИ("СС ";B15;1)+2))

к "СС" привязаться нельзя
 
Ответить
Сообщение
=ПРАВСИМВ(B15;ДЛСТР(B15)-(НАЙТИ("СС ";B15;1)+2))

к "СС" привязаться нельзя

Автор - valermihali4
Дата добавления - 30.09.2015 в 10:09
Anton1013 Дата: Среда, 30.09.2015, 10:12 | Сообщение № 6
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 203
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Сам окончательный текст всегда содержит одинаковое количество знаков?


Никогда не поздно научиться!
 
Ответить
СообщениеСам окончательный текст всегда содержит одинаковое количество знаков?

Автор - Anton1013
Дата добавления - 30.09.2015 в 10:12
valermihali4 Дата: Среда, 30.09.2015, 10:13 | Сообщение № 7
Группа: Пользователи
Ранг: Новичок
Сообщений: 37
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007
Сам окончательный текст всегда содержит одинаковое количество знаков?

Нет. Количество всегда разное.
 
Ответить
Сообщение
Сам окончательный текст всегда содержит одинаковое количество знаков?

Нет. Количество всегда разное.

Автор - valermihali4
Дата добавления - 30.09.2015 в 10:13
Pelena Дата: Среда, 30.09.2015, 10:31 | Сообщение № 8
Группа: Админы
Ранг: Местный житель
Сообщений: 19185
Репутация: 4420 ±
Замечаний: ±

Excel 365 & Mac Excel
Код
=ПСТР(C1;ПОИСК("|";ПОДСТАВИТЬ(C1;" ";"|";ДЛСТР(C1)-ДЛСТР(ПОДСТАВИТЬ(C1;" ";))-2))+1;99)

или
Код
=ЗАМЕНИТЬ(C1;1;ПОИСК("|";ПОДСТАВИТЬ(C1;" ";"|";ДЛСТР(C1)-ДЛСТР(ПОДСТАВИТЬ(C1;" ";))-2));)
К сообщению приложен файл: 3104630.xlsx (11.8 Kb)


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
Сообщение
Код
=ПСТР(C1;ПОИСК("|";ПОДСТАВИТЬ(C1;" ";"|";ДЛСТР(C1)-ДЛСТР(ПОДСТАВИТЬ(C1;" ";))-2))+1;99)

или
Код
=ЗАМЕНИТЬ(C1;1;ПОИСК("|";ПОДСТАВИТЬ(C1;" ";"|";ДЛСТР(C1)-ДЛСТР(ПОДСТАВИТЬ(C1;" ";))-2));)

Автор - Pelena
Дата добавления - 30.09.2015 в 10:31
МВТ Дата: Среда, 30.09.2015, 16:58 | Сообщение № 9
Группа: Проверенные
Ранг: Обитатель
Сообщений: 476
Репутация: 137 ±
Замечаний: 0% ±

Excel 2007
Может пригодится: возвращает конец строки состоящий из заданного количества слов (в качестве разделителя воспринимает любые пробельные символы)
[vba]
Код
Function GetFromEnd(Text As String, Number As Long) As String
With CreateObject("VBScript.regExp")
     .IgnoreCase = True
     .Pattern = "\s+"
     If .test(Text) Then Text = .Replace(Text, " ")
     .Pattern = ".+?( |$)"
     .Global = True
     If .test(Text) Then
         With .Execute(Text)
            If .Count <= Number Then
                 GetFromEnd = Text
                 Exit Function
            End If
         For I = Number To 1 Step -1
             GetFromEnd = GetFromEnd & .Item(.Count - I)
         Next I
         End With
     End If
End With
[/vba]
 
Ответить
СообщениеМожет пригодится: возвращает конец строки состоящий из заданного количества слов (в качестве разделителя воспринимает любые пробельные символы)
[vba]
Код
Function GetFromEnd(Text As String, Number As Long) As String
With CreateObject("VBScript.regExp")
     .IgnoreCase = True
     .Pattern = "\s+"
     If .test(Text) Then Text = .Replace(Text, " ")
     .Pattern = ".+?( |$)"
     .Global = True
     If .test(Text) Then
         With .Execute(Text)
            If .Count <= Number Then
                 GetFromEnd = Text
                 Exit Function
            End If
         For I = Number To 1 Step -1
             GetFromEnd = GetFromEnd & .Item(.Count - I)
         Next I
         End With
     End If
End With
[/vba]

Автор - МВТ
Дата добавления - 30.09.2015 в 16:58
sv2014 Дата: Четверг, 01.10.2015, 00:47 | Сообщение № 10
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 226
Репутация: 61 ±
Замечаний: 0% ±

Excel 2013
valermihali4, доброго времени суток,для вашего файл-примера,можно такую функцию применить,синяя кнопка
в файл-примере заносит функцию в диапазон .

[vba]
Код
Function ZZZ$(st$)
      Dim x: x = Split(st)
       ZZZ = x(UBound(x) - 2) & Chr(32) & x(UBound(x) - 1) & Chr(32) & x(UBound(x))
End Function
[/vba]
К сообщению приложен файл: example_30_09_2.xls (51.0 Kb)
 
Ответить
Сообщениеvalermihali4, доброго времени суток,для вашего файл-примера,можно такую функцию применить,синяя кнопка
в файл-примере заносит функцию в диапазон .

[vba]
Код
Function ZZZ$(st$)
      Dim x: x = Split(st)
       ZZZ = x(UBound(x) - 2) & Chr(32) & x(UBound(x) - 1) & Chr(32) & x(UBound(x))
End Function
[/vba]

Автор - sv2014
Дата добавления - 01.10.2015 в 00:47
МВТ Дата: Четверг, 01.10.2015, 00:52 | Сообщение № 11
Группа: Проверенные
Ранг: Обитатель
Сообщений: 476
Репутация: 137 ±
Замечаний: 0% ±

Excel 2007
sv2014, рекомендую вставить проверку: если "слов" меньше 3-х, вызовет ошибку
 
Ответить
Сообщениеsv2014, рекомендую вставить проверку: если "слов" меньше 3-х, вызовет ошибку

Автор - МВТ
Дата добавления - 01.10.2015 в 00:52
AlexM Дата: Четверг, 01.10.2015, 01:30 | Сообщение № 12
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4495
Репутация: 1116 ±
Замечаний: 0% ±

Excel 2003
Если извлекать значение из столбца А
Код
=СЖПРОБЕЛЫ(ПРАВБ(A1;40))
Если извлекать из столбца С. Формула массива
Код
=ПСТР(C1;ПОИСКПОЗ(2;1/(ПСТР(C1;СТРОКА($1:$99);1)>"9"))+2;99)
К сообщению приложен файл: 3752077_1.xls (41.0 Kb)



Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.
 
Ответить
СообщениеЕсли извлекать значение из столбца А
Код
=СЖПРОБЕЛЫ(ПРАВБ(A1;40))
Если извлекать из столбца С. Формула массива
Код
=ПСТР(C1;ПОИСКПОЗ(2;1/(ПСТР(C1;СТРОКА($1:$99);1)>"9"))+2;99)

Автор - AlexM
Дата добавления - 01.10.2015 в 01:30
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Удаление значение до третьего пробела с конца значения. (Иное/Other)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!