Каким образом из данных в ячейке [Note/11’-13’ ASUS S200E-CT321H] предположим А1 я могу в ячейку А2 вытащить только третье слово (т.е. если считать по пробелам, а именно: [S200E-CT321H]. Подскажите пожалуйста формулу.
А тут [Audio/h SENNHEISER MX 471] Вырезать в соседнюю ячейку два слова [MX 471]
Каким образом из данных в ячейке [Note/11’-13’ ASUS S200E-CT321H] предположим А1 я могу в ячейку А2 вытащить только третье слово (т.е. если считать по пробелам, а именно: [S200E-CT321H]. Подскажите пожалуйста формулу.
А тут [Audio/h SENNHEISER MX 471] Вырезать в соседнюю ячейку два слова [MX 471]wwizard
Сообщение отредактировал wwizard - Пятница, 30.08.2013, 01:28
А если такое значение [netw.a TP-LINK TL-SF1005D Unmanaged 10/100M Switch] а нужно только: [1005D]
может можно прописать формулу так чтобы она ссылалась например на АЕ1 - там указывается циферкой какое слово от пробела до пробела брать, и AF1 сколько слов идет подряд
А если такое значение [netw.a TP-LINK TL-SF1005D Unmanaged 10/100M Switch] а нужно только: [1005D]
может можно прописать формулу так чтобы она ссылалась например на АЕ1 - там указывается циферкой какое слово от пробела до пробела брать, и AF1 сколько слов идет подрядwwizard
Сообщение отредактировал wwizard - Пятница, 30.08.2013, 03:05
Вы показали 3 примера в которых надо получить третье слово. В первом примере вы показали правильный результат - "S200E-CT321H" Во втором должно быть - "MX" , а не "MX 471" В третьем должно быть "TL-SF1005D" , а не "1005D"
Вы показали 3 примера в которых надо получить третье слово. В первом примере вы показали правильный результат - "S200E-CT321H" Во втором должно быть - "MX" , а не "MX 471" В третьем должно быть "TL-SF1005D" , а не "1005D"
Нужна возможность указать на ячейку, где я могу циферкой ставить какое слово надо вытащить, и ячейка для второго слова.
буквально точное описание специализированной UDF. Указываем ячейку, разделитель и номера слов.
[vba]
Код
Function Substring(Текст As String, Символ_разделитель As String, _ Начальный_Номер_фрагмента As Long, Конечный_Номер_фрагмента As Long) As String '--------------------------------------------------------------------------------------- ' URL : http://www.planetaexcel.ru/tip.php?aid=54 ' Purpose : Выделяет из текста субстринг/и, ориентируясь по символам-разделителям ' Notes : Substring(текст; символ_разделитель; Начальный_Номер_фрагмента, Конечный_Номер_фрагмента), где ' текст - текст, который делим ' символ_разделитель - символ, который надо считать разделителем фрагментов ' Начальный_Номер_фрагмента - порядковый номер фрагмента, с которого нужна выборка ' Конечный_Номер_фрагмента - порядковый номер фрагмента, по который нужна выборка '--------------------------------------------------------------------------------------- On Error Resume Next Dim sArr() As String, li As Long sArr = Split(Application.Trim(Текст), Символ_разделитель) If Конечный_Номер_фрагмента > 0 Then Начальный_Номер_фрагмента = Начальный_Номер_фрагмента - 1 Конечный_Номер_фрагмента = Конечный_Номер_фрагмента - 1 For li = Начальный_Номер_фрагмента To Конечный_Номер_фрагмента Substring = IIf(li = Начальный_Номер_фрагмента, sArr(li), Substring & _ Символ_разделитель & sArr(li)) Next li Else Substring = Split(Application.Trim(Текст), _ Символ_разделитель)(Начальный_Номер_фрагмента - 1) End If End Function
[/vba] На указанном в коде сайте это уже где-то в другом месте. так сразу не нашёл...
Нужна возможность указать на ячейку, где я могу циферкой ставить какое слово надо вытащить, и ячейка для второго слова.
буквально точное описание специализированной UDF. Указываем ячейку, разделитель и номера слов.
[vba]
Код
Function Substring(Текст As String, Символ_разделитель As String, _ Начальный_Номер_фрагмента As Long, Конечный_Номер_фрагмента As Long) As String '--------------------------------------------------------------------------------------- ' URL : http://www.planetaexcel.ru/tip.php?aid=54 ' Purpose : Выделяет из текста субстринг/и, ориентируясь по символам-разделителям ' Notes : Substring(текст; символ_разделитель; Начальный_Номер_фрагмента, Конечный_Номер_фрагмента), где ' текст - текст, который делим ' символ_разделитель - символ, который надо считать разделителем фрагментов ' Начальный_Номер_фрагмента - порядковый номер фрагмента, с которого нужна выборка ' Конечный_Номер_фрагмента - порядковый номер фрагмента, по который нужна выборка '--------------------------------------------------------------------------------------- On Error Resume Next Dim sArr() As String, li As Long sArr = Split(Application.Trim(Текст), Символ_разделитель) If Конечный_Номер_фрагмента > 0 Then Начальный_Номер_фрагмента = Начальный_Номер_фрагмента - 1 Конечный_Номер_фрагмента = Конечный_Номер_фрагмента - 1 For li = Начальный_Номер_фрагмента To Конечный_Номер_фрагмента Substring = IIf(li = Начальный_Номер_фрагмента, sArr(li), Substring & _ Символ_разделитель & sArr(li)) Next li Else Substring = Split(Application.Trim(Текст), _ Символ_разделитель)(Начальный_Номер_фрагмента - 1) End If End Function
[/vba] На указанном в коде сайте это уже где-то в другом месте. так сразу не нашёл...Hugo
Привет всем. Нужна помощь вытащить часть значения из одной ячейки в другую 1 ячейка текст Оприбут ПК RA71 - 9шт; RA63 - 1шт; RA58 - 10шт; RA52 - 8шт; RA61 - 341шт; RA51 - 1 шт; УкрКарт - 1шт та ПІН-конверти
спс. [moder]Тема закрыта. Причина: нарушение п.п. 3, 4, 5q Правил форума[/moder]
Привет всем. Нужна помощь вытащить часть значения из одной ячейки в другую 1 ячейка текст Оприбут ПК RA71 - 9шт; RA63 - 1шт; RA58 - 10шт; RA52 - 8шт; RA61 - 341шт; RA51 - 1 шт; УкрКарт - 1шт та ПІН-конверти
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
