Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Удалить часть строки после символа, обрезать left mid
 
#1
16.09.2013 10:23:39
Добрый день!
Как сделать строку вида:
www.planetaexcel.ru/forum/index.php
www.planetaexcel.ru/
Найти символ / и удалить всё что за ним.
=LEFT(...MID(/)..))

Какая формула точно нужна? я пробывал - не получилось у меня.
 
 
 
#2
16.09.2013 10:30:54
Код
?
1
=ЛЕВСИМВ(A2;ПОИСК("/";A2)-1)
Изменено: V - 16.09.2013 10:55:22 (перемудрил)
 
 
 
#3
16.09.2013 10:33:43
ctrl+h
Я сам - дурнее всякого примера! ...
 
 
 
#4
16.09.2013 10:42:04
можно и так
Код
?
1
=ПСТР(A4;1;ПОИСК("/";A4)-1)
Вполне такой нормальный кинжальчик. Процентов на 100
 
 
 
#5
16.09.2013 12:24:54
Кстати, вопрос: а почему по русски? не уже это удобно? я присто всегда стараюсь писать по анг. функции.
 
 
 
#6
16.09.2013 12:27:56
а почему бы и нет?
Учимся сами и помогаем другим...
 
 
 
#7
16.09.2013 13:06:08
А можно доработать с условием IF, если нет символа, то просто копирут или ничего не обрезает.
если А2 вида www.planetaexcel.ru то В2 = A2
 
 
 
#8
16.09.2013 14:06:47
Код
?
1
=ЕСЛИ(ЕОШИБКА(ПОИСК("/";A2));A2;ЛЕВСИМВ(A2;ПОИСК("/";A2)-1))
 
 
 
#9
20.11.2013 23:01:42
Добрый вечер! Подскажите, пожалуйста, формулу: как удалить в строках нумерацию вместе с точкой?
Изменено: Andrey Ch - 21.11.2013 01:13:36
 
 
 
#10
20.11.2013 23:05:45
=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПСТР(A2;5;500);СИМВОЛ(160);))
 
 
 
#11
20.11.2013 23:05:51
Код
?
1
=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПСТР(A2;ПОИСК(".";A2)+1;ДЛСТР(A2));СИМВОЛ(160);""))
 
 
 
#12
21.11.2013 00:07:49
Простите чайника, но ГДЕ и КАК? :(
 
 
 
#13
21.11.2013 00:15:40
Там и так :)
Вставляете формулу в ячейку свободного столбца (например, В2) и копируете ячейку по строкам ниже.
 
 
 
#14
21.11.2013 00:40:53
О, благодарю Вас!! :D
 
 
 
#15
15.05.2024 06:31:53
Здравствуйте.
Помогите пожалуйста, что то не получается.
Есть ячейки
155+100
100+200
100
Пытаюсь обрезать все что после символа и суммировать - формула=СУММ(ЕСЛИОШИБКА(ЕСЛИ(ПОИСК("+";B4:B6);--ПОДСТАВИТЬ(B4:B6;"+";ЛЕВСИМВ(B4:B6;ПОИСК("+";B4:B6)-1)));0))

Выдает результат
255255300
1. Получается не обрезает, а что то не понятное. Хотя используя отдельно формулу ЛЕВСИМВ(B4:B6;ПОИСК("+";B4:B6)-1) - работает
2. Не правильно суммирует, должно быть 355
 
 
 
#16
15.05.2024 06:42:07
Код
?
1
{=СУММ(ЕСЛИОШИБКА(--ЛЕВСИМВ(B4:B6; ПОИСК("+"; B4:B6&"+")-1); 0))}
А ваша формула превращает:
155+100 => 155155100
100+200 => 100100200
100         => 0
Изменено: andypetr - 15.05.2024 06:45:16
 
 
 
#17
15.05.2024 10:35:43
Цитата
proftp:   Пытаюсь обрезать все что после символа и суммировать ... должно быть 355
=СУММПРОИЗВ(ОТБР(0&ПОДСТАВИТЬ(B4:B7;"+";",")))
 
 
 
#18
15.05.2024 11:13:23
Кстати, да, Павел \Ʌ/, спасибо за подсказку про не-массивную формулу!
Но я бы написал так:
Код
?
1
=СУММПРОИЗВ(--(ЛЕВСИМВ(B4:B6; ПОИСК("+"; B4:B6&"+")-1)&ПСТР(1/2;2;1)&"0"))
  1. Не зависит от кол-ва "+" в ячейках - всегда берётся левая часть: 100+200+300 => 100.
  2. Допускает отрицательные числа: -100+200+300 => -100.
  3. Не зависит от системного разделителя дробной части (например, у меня точка).
 
 
 
#19
15.05.2024 12:30:24
andypetr, пожалуста  ;)
собственно ваша формула ...почти:
=-СУММПРОИЗВ(-ЛЕВБ(0&B4:B7;ПОИСК("+";B4:B7&"+")))
 
 
 
#20
15.05.2024 23:10:10
Цитата
Найти символ / и удалить всё что за ним
UDF
Код
?
1
2
3
4
5
6
7
Function GetFragment(cell$)
   If InStr(1, cell, "/") > 0 Then
     GetFragment = Split(cell, "/", 2)(0)
   Else
     GetFragment = cell
   End If
End Function
Изменено: Kuzmich - 15.05.2024 23:12:05
 
 
 
#21
20.05.2024 06:06:36
Цитата
написал:
andypetr , пожалуста   собственно ваша формула ...почти:=-СУММПРОИЗВ(-ЛЕВБ(0&B4:B7;ПОИСК("+";B4:B7&"+")))
Спасибо формулы работают.
Единственное когда фильтр включаю считает все ячейки видимые и не видимые.
Как можно изменить формулу, что бы только видимые считало?
 
 
 
#22
20.05.2024 07:08:57
Цитата
Как можно изменить формулу, что бы только видимые считало
У меня получается только через доп. столбец.
В C4:
Код
?
1
=ЕСЛИ(АГРЕГАТ(3;1;B4); B4; "")
Ну и основная формула ссылается уже на столбец C:
Код
?
1
=СУММПРОИЗВ(--(ЛЕВСИМВ(C4:C6; ПОИСК("+"; C4:C6&"+")-1)&ПСТР(1/2;2;1)&"0"))
 
 
 
#23
20.05.2024 10:30:30
Цитата
Kuzmich: UDF
вариант, конечно, но не очень логично НЕ использовать найденную позицию. Либо использовать её, либо сразу сплитовать и проверять массив, как мне кажется.
2 варианта
Нужный (строковый) тип функции тоже лучше объявлять.
Изменено: Jack Famous - 20.05.2024 10:32:04
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
 
 
 
#24
20.05.2024 11:46:50
Цитата
написал:
' Faster
Function GetFragment(s$) As String
Dim i&
  i = InStr(s, "/")
  If (i = 0) Then GetFragment = s Else GetFragment = Left$(s, i - 1)
End Function
'============================================================­======================================
' Slowler
Function GetFragment2(s$) As String
Dim x
  x = Split(s, "/")
  If (UBound(x) = 0) Then GetFragment2 = s Else GetFragment2 = x(0)
End Function
Это через код страницы как я понимаю
А в гугл таблицах его же не вставить?
 
 
 
#25
20.05.2024 12:05:54
Jack Famous, добрый день. Можно и компактнее :):
Код
?
1
2
3
4
5
6
7
8
9
' Faster
Function GetFragment(s$) As String
   GetFragment = Left(s, InStr(s + "/", "/") - 1)
End Function
'==================================================================================================
' Slowler
Function GetFragment2(s$) As String
   GetFragment2 = Split(s, "/")(0)
End Function
 
 
 
#26
20.05.2024 12:57:14
andypetr, со 2ым вариантом соглашусь (сначала брал x(1), пока не уточнил ТЗ), то для 1го делать ненужную сцепку только ради краткости никогда бы не стал … Скорость мне важнее  :)
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
 
 
 
#27
20.05.2024 13:01:04
Jack Famous, почему же эта сцепка "ненужная"? разве эта сцепка в этом варианте не нужна? и скорость с ней нисколько не страдает :)
 
 
 
#28
20.05.2024 13:09:46
=SUMPRODUCT(--LEFT(0&SUBSTITUTE(B4:B7;"+";"     ");5))
для универсальности
=SUMPRODUCT(--LEFT(0&SUBSTITUTE(B4:B7;"+";REPT(" ";14);15))


Цитата
proftp написал:
Как можно изменить формулу, что бы только видимые считало?
- это совершенно иной вопрос и иная тема.
Изменено: БМВ - 20.05.2024 13:30:58
По вопросам из тем форума, личку не читаю.
 
 
 
#29
21.05.2024 11:12:32
Всем спасибо за помощь!
 
 
 
Страницы: 1
Читают тему
Loading...