Текст по столбцам после первого пробела
ant6729
Дата: Пятница, 31.05.2019, 10:54 |
Сообщение № 1
Группа: Проверенные
Ранг: Ветеран
Сообщений: 533
Репутация:
2
±
Замечаний:
40% ±
Excel 2010
Всем привет, времени мало Но... Условно в списке вниз на 10 строк в одной колонке любые строково-цифровые значения с пробелом Требуется отделить во вторую колонку то, что только после первого пробела в строке первой колонки. Спасибо.
Всем привет, времени мало Но... Условно в списке вниз на 10 строк в одной колонке любые строково-цифровые значения с пробелом Требуется отделить во вторую колонку то, что только после первого пробела в строке первой колонки. Спасибо. ant6729
Ответить
Сообщение Всем привет, времени мало Но... Условно в списке вниз на 10 строк в одной колонке любые строково-цифровые значения с пробелом Требуется отделить во вторую колонку то, что только после первого пробела в строке первой колонки. Спасибо. Автор - ant6729 Дата добавления - 31.05.2019 в 10:54
китин
Дата: Пятница, 31.05.2019, 11:20 |
Сообщение № 2
Группа: Модераторы
Ранг: Экселист
Сообщений: 7029
Репутация:
1078
±
Замечаний:
0% ±
Excel 2007;2010;2016
Всем привет, времени мало
и файла нет
Всем привет, времени мало
и файла неткитин
Не судите очень строго:я пытаюсь научиться ЯД 41001877306852
Ответить
Сообщение Всем привет, времени мало
и файла нетАвтор - китин Дата добавления - 31.05.2019 в 11:20
_Boroda_
Дата: Пятница, 31.05.2019, 11:30 |
Сообщение № 3
Группа: Админы
Ранг: Местный житель
Сообщений: 16718
Репутация:
6505
±
Замечаний:
±
2003; 2007; 2010; 2013 RUS
Без файла так [vba]Код
Sub tt() n_ = Cells(Rows.Count, 1).End(3).Row ar = Cells(1, 1).Resize(n_) For i = 1 To UBound(ar) ar(i, 1) = Split(ar(i, 1), , 2)(1) Next i Cells(1, 2).Resize(n_) = ar End Sub
[/vba]Код
=ПСТР(A1;ПОИСК(" ";A1)+1;999)
Без файла так [vba]Код
Sub tt() n_ = Cells(Rows.Count, 1).End(3).Row ar = Cells(1, 1).Resize(n_) For i = 1 To UBound(ar) ar(i, 1) = Split(ar(i, 1), , 2)(1) Next i Cells(1, 2).Resize(n_) = ar End Sub
[/vba]Код
=ПСТР(A1;ПОИСК(" ";A1)+1;999)
_Boroda_
Скажи мне, кудесник, любимец ба’гов... Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
Ответить
Сообщение Без файла так [vba]Код
Sub tt() n_ = Cells(Rows.Count, 1).End(3).Row ar = Cells(1, 1).Resize(n_) For i = 1 To UBound(ar) ar(i, 1) = Split(ar(i, 1), , 2)(1) Next i Cells(1, 2).Resize(n_) = ar End Sub
[/vba]Код
=ПСТР(A1;ПОИСК(" ";A1)+1;999)
Автор - _Boroda_ Дата добавления - 31.05.2019 в 11:30
ant6729
Дата: Пятница, 31.05.2019, 12:29 |
Сообщение № 4
Группа: Проверенные
Ранг: Ветеран
Сообщений: 533
Репутация:
2
±
Замечаний:
40% ±
Excel 2010
Таки да, все понятно, как всегда круто, спасибо
Таки да, все понятно, как всегда круто, спасибо ant6729
Сообщение отредактировал ant6729 - Пятница, 31.05.2019, 12:36
Ответить
Сообщение Таки да, все понятно, как всегда круто, спасибо Автор - ant6729 Дата добавления - 31.05.2019 в 12:29
_Boroda_
Дата: Пятница, 31.05.2019, 12:38 |
Сообщение № 5
Группа: Админы
Ранг: Местный житель
Сообщений: 16718
Репутация:
6505
±
Замечаний:
±
2003; 2007; 2010; 2013 RUS
А если бы была задача от начальной строки и до конца возможностей листа?
Это как? Посмотрите в коде расчет для n_ - это последняя заполненная строка на листе
А если бы была задача от начальной строки и до конца возможностей листа?
Это как? Посмотрите в коде расчет для n_ - это последняя заполненная строка на листе_Boroda_
Скажи мне, кудесник, любимец ба’гов... Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
Ответить
Сообщение А если бы была задача от начальной строки и до конца возможностей листа?
Это как? Посмотрите в коде расчет для n_ - это последняя заполненная строка на листеАвтор - _Boroda_ Дата добавления - 31.05.2019 в 12:38