Разбить текст построчно - ориентируясь на круговые символы ❶
odeon16
Дата: Воскресенье, 04.06.2017, 21:35 |
Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 85
Репутация:
0
±
Замечаний:
0% ±
Excel 2013
Здравствуйте, гуру экселя. Помогите советом. У меня есть текст записанный в ячейку B11. Текст разделен круговыми символами. Я ввел эти символы, поскольку - как мне кажется они лучше видны, чем обычные цифры. Как формулой разбить этот текст построчно- с выводом в столбец G14:G35, ориентируясь на круговые символы(❶ и т.д.)?
Здравствуйте, гуру экселя. Помогите советом. У меня есть текст записанный в ячейку B11. Текст разделен круговыми символами. Я ввел эти символы, поскольку - как мне кажется они лучше видны, чем обычные цифры. Как формулой разбить этот текст построчно- с выводом в столбец G14:G35, ориентируясь на круговые символы(❶ и т.д.)? odeon16
Сообщение отредактировал odeon16 - Воскресенье, 04.06.2017, 22:28
Ответить
Сообщение Здравствуйте, гуру экселя. Помогите советом. У меня есть текст записанный в ячейку B11. Текст разделен круговыми символами. Я ввел эти символы, поскольку - как мне кажется они лучше видны, чем обычные цифры. Как формулой разбить этот текст построчно- с выводом в столбец G14:G35, ориентируясь на круговые символы(❶ и т.д.)? Автор - odeon16 Дата добавления - 04.06.2017 в 21:35
Nic70y
Дата: Воскресенье, 04.06.2017, 22:15 |
Сообщение № 2
Группа: Друзья
Ранг: Экселист
Сообщений: 8759
Репутация:
2273
±
Замечаний:
0% ±
Excel 2010
ну это очеееень приблизительно... либо как отличить 3,4,3 от 345?
ну это очеееень приблизительно... либо как отличить 3,4,3 от 345? Nic70y
ЮMoney 41001841029809
Ответить
Сообщение ну это очеееень приблизительно... либо как отличить 3,4,3 от 345? Автор - Nic70y Дата добавления - 04.06.2017 в 22:15
odeon16
Дата: Воскресенье, 04.06.2017, 22:30 |
Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 85
Репутация:
0
±
Замечаний:
0% ±
Excel 2013
Nic70y, символы типа ❶ - это вроде не числа, а текст.
Nic70y, символы типа ❶ - это вроде не числа, а текст. odeon16
Ответить
Сообщение Nic70y, символы типа ❶ - это вроде не числа, а текст. Автор - odeon16 Дата добавления - 04.06.2017 в 22:30
buchlotnik
Дата: Воскресенье, 04.06.2017, 22:34 |
Сообщение № 4
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация:
929
±
Замечаний:
20% ±
2010, 2013, 2016 RUS / ENG
и что? как отличить ❶❷, обозначающего последовательно 1 и 2, от ❶❷, обозначающего 12?
и что? как отличить ❶❷, обозначающего последовательно 1 и 2, от ❶❷, обозначающего 12? buchlotnik
Ответить
Сообщение и что? как отличить ❶❷, обозначающего последовательно 1 и 2, от ❶❷, обозначающего 12? Автор - buchlotnik Дата добавления - 04.06.2017 в 22:34
vikttur
Дата: Воскресенье, 04.06.2017, 22:42 |
Сообщение № 5
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2941
Вы специально усложняете себе жизнь (это же надо было каждый символ вставить)? Это Вы видите цифры на фоне, а для Excel все это СИМВОЛ(63). Нельзя ли какой-либо разделитель ставить вместо этой выдумки? Например, запятая?Код
=СЖПРОБЕЛЫ(ПСТР(ПОДСТАВИТЬ(","&$B$11;",";ПОВТОР(" ";99));СТРОКА(A1)*99;99))
Вы специально усложняете себе жизнь (это же надо было каждый символ вставить)? Это Вы видите цифры на фоне, а для Excel все это СИМВОЛ(63). Нельзя ли какой-либо разделитель ставить вместо этой выдумки? Например, запятая?Код
=СЖПРОБЕЛЫ(ПСТР(ПОДСТАВИТЬ(","&$B$11;",";ПОВТОР(" ";99));СТРОКА(A1)*99;99))
vikttur
Сообщение отредактировал vikttur - Воскресенье, 04.06.2017, 22:43
Ответить
Сообщение Вы специально усложняете себе жизнь (это же надо было каждый символ вставить)? Это Вы видите цифры на фоне, а для Excel все это СИМВОЛ(63). Нельзя ли какой-либо разделитель ставить вместо этой выдумки? Например, запятая?Код
=СЖПРОБЕЛЫ(ПСТР(ПОДСТАВИТЬ(","&$B$11;",";ПОВТОР(" ";99));СТРОКА(A1)*99;99))
Автор - vikttur Дата добавления - 04.06.2017 в 22:42
RAN
Дата: Воскресенье, 04.06.2017, 22:44 |
Сообщение № 6
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Формула говорит, что код любого кружка = 63 PS VBA, правда, их различает [vba]Код
Function CodeAscW(r As Range) CodeAscW = AscW(Left$(r, 1)) End Function
[/vba]
Формула говорит, что код любого кружка = 63 PS VBA, правда, их различает [vba]Код
Function CodeAscW(r As Range) CodeAscW = AscW(Left$(r, 1)) End Function
[/vba] RAN
Быть или не быть, вот в чем загвоздка!
Сообщение отредактировал RAN - Воскресенье, 04.06.2017, 22:51
Ответить
Сообщение Формула говорит, что код любого кружка = 63 PS VBA, правда, их различает [vba]Код
Function CodeAscW(r As Range) CodeAscW = AscW(Left$(r, 1)) End Function
[/vba] Автор - RAN Дата добавления - 04.06.2017 в 22:44
buchlotnik
Дата: Воскресенье, 04.06.2017, 22:53 |
Сообщение № 7
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация:
929
±
Замечаний:
20% ±
2010, 2013, 2016 RUS / ENG
Цитата
код любого кружка = 63
это если КОДСИМВ(), а вот UNICODE() как раз различает, но от этого не легче
Цитата
код любого кружка = 63
это если КОДСИМВ(), а вот UNICODE() как раз различает, но от этого не легчеbuchlotnik
Ответить
Сообщение Цитата
код любого кружка = 63
это если КОДСИМВ(), а вот UNICODE() как раз различает, но от этого не легчеАвтор - buchlotnik Дата добавления - 04.06.2017 в 22:53
RAN
Дата: Воскресенье, 04.06.2017, 22:55 |
Сообщение № 8
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
UNICODE() как раз различает
Где бы такое взять
UNICODE() как раз различает
Где бы такое взять RAN
Быть или не быть, вот в чем загвоздка!
Ответить
Сообщение UNICODE() как раз различает
Где бы такое взять Автор - RAN Дата добавления - 04.06.2017 в 22:55
buchlotnik
Дата: Воскресенье, 04.06.2017, 23:04 |
Сообщение № 9
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация:
929
±
Замечаний:
20% ±
2010, 2013, 2016 RUS / ENG
Цитата
Где бы такое взять
а, ну да - в 2013 и новее
Цитата
Где бы такое взять
а, ну да - в 2013 и новее buchlotnik
Ответить
Сообщение Цитата
Где бы такое взять
а, ну да - в 2013 и новее Автор - buchlotnik Дата добавления - 04.06.2017 в 23:04
Nic70y
Дата: Понедельник, 05.06.2017, 11:19 |
Сообщение № 10
Группа: Друзья
Ранг: Экселист
Сообщений: 8759
Репутация:
2273
±
Замечаний:
0% ±
Excel 2010
ну тогда держитеКод
=ЕСЛИОШИБКА(ПСТР(B$11;ПОИСК(ПОДСТАВИТЬ(ЕСЛИ(СТРОКА(G1)=11;ЮНИСИМВ(10111);ЮНИСИМВ(ОКРУГЛВНИЗ((СТРОКА(G1)-1)/10;)+10101)&ЮНИСИМВ(ЕСЛИ(ОСТАТ(СТРОКА(G1);10)=1;9471;ОСТАТ(СТРОКА(G1)-1;10)+10101)));"❵";);B$11);ЕСЛИОШИБКА(ПОИСК(ПОДСТАВИТЬ(ЕСЛИ(СТРОКА(G2)=11;ЮНИСИМВ(10111);ЮНИСИМВ(ОКРУГЛВНИЗ((СТРОКА(G2)-1)/10;)+10101)&ЮНИСИМВ(ЕСЛИ(ОСТАТ(СТРОКА(G2);10)=1;9471;ОСТАТ(СТРОКА(G2)-1;10)+10101)));"❵";);B$11);ДЛСТР(B$11))-ПОИСК(ПОДСТАВИТЬ(ЕСЛИ(СТРОКА(G1)=11;ЮНИСИМВ(10111);ЮНИСИМВ(ОКРУГЛВНИЗ((СТРОКА(G1)-1)/10;)+10101)&ЮНИСИМВ(ЕСЛИ(ОСТАТ(СТРОКА(G1);10)=1;9471;ОСТАТ(СТРОКА(G1)-1;10)+10101)));"❵";);B$11));"")
[p.s.]>=2013 само собой[/p.s.]
ну тогда держитеКод
=ЕСЛИОШИБКА(ПСТР(B$11;ПОИСК(ПОДСТАВИТЬ(ЕСЛИ(СТРОКА(G1)=11;ЮНИСИМВ(10111);ЮНИСИМВ(ОКРУГЛВНИЗ((СТРОКА(G1)-1)/10;)+10101)&ЮНИСИМВ(ЕСЛИ(ОСТАТ(СТРОКА(G1);10)=1;9471;ОСТАТ(СТРОКА(G1)-1;10)+10101)));"❵";);B$11);ЕСЛИОШИБКА(ПОИСК(ПОДСТАВИТЬ(ЕСЛИ(СТРОКА(G2)=11;ЮНИСИМВ(10111);ЮНИСИМВ(ОКРУГЛВНИЗ((СТРОКА(G2)-1)/10;)+10101)&ЮНИСИМВ(ЕСЛИ(ОСТАТ(СТРОКА(G2);10)=1;9471;ОСТАТ(СТРОКА(G2)-1;10)+10101)));"❵";);B$11);ДЛСТР(B$11))-ПОИСК(ПОДСТАВИТЬ(ЕСЛИ(СТРОКА(G1)=11;ЮНИСИМВ(10111);ЮНИСИМВ(ОКРУГЛВНИЗ((СТРОКА(G1)-1)/10;)+10101)&ЮНИСИМВ(ЕСЛИ(ОСТАТ(СТРОКА(G1);10)=1;9471;ОСТАТ(СТРОКА(G1)-1;10)+10101)));"❵";);B$11));"")
[p.s.]>=2013 само собой[/p.s.] Nic70y
ЮMoney 41001841029809
Сообщение отредактировал Nic70y - Понедельник, 05.06.2017, 11:30
Ответить
Сообщение ну тогда держитеКод
=ЕСЛИОШИБКА(ПСТР(B$11;ПОИСК(ПОДСТАВИТЬ(ЕСЛИ(СТРОКА(G1)=11;ЮНИСИМВ(10111);ЮНИСИМВ(ОКРУГЛВНИЗ((СТРОКА(G1)-1)/10;)+10101)&ЮНИСИМВ(ЕСЛИ(ОСТАТ(СТРОКА(G1);10)=1;9471;ОСТАТ(СТРОКА(G1)-1;10)+10101)));"❵";);B$11);ЕСЛИОШИБКА(ПОИСК(ПОДСТАВИТЬ(ЕСЛИ(СТРОКА(G2)=11;ЮНИСИМВ(10111);ЮНИСИМВ(ОКРУГЛВНИЗ((СТРОКА(G2)-1)/10;)+10101)&ЮНИСИМВ(ЕСЛИ(ОСТАТ(СТРОКА(G2);10)=1;9471;ОСТАТ(СТРОКА(G2)-1;10)+10101)));"❵";);B$11);ДЛСТР(B$11))-ПОИСК(ПОДСТАВИТЬ(ЕСЛИ(СТРОКА(G1)=11;ЮНИСИМВ(10111);ЮНИСИМВ(ОКРУГЛВНИЗ((СТРОКА(G1)-1)/10;)+10101)&ЮНИСИМВ(ЕСЛИ(ОСТАТ(СТРОКА(G1);10)=1;9471;ОСТАТ(СТРОКА(G1)-1;10)+10101)));"❵";);B$11));"")
[p.s.]>=2013 само собой[/p.s.] Автор - Nic70y Дата добавления - 05.06.2017 в 11:19
odeon16
Дата: Понедельник, 05.06.2017, 13:13 |
Сообщение № 11
Группа: Пользователи
Ранг: Участник
Сообщений: 85
Репутация:
0
±
Замечаний:
0% ±
Excel 2013
Nic70y, ну что я могу сказать. Сделано - воистину хитро. Все работает. Огромное спасибо.
Nic70y, ну что я могу сказать. Сделано - воистину хитро. Все работает. Огромное спасибо. odeon16
Ответить
Сообщение Nic70y, ну что я могу сказать. Сделано - воистину хитро. Все работает. Огромное спасибо. Автор - odeon16 Дата добавления - 05.06.2017 в 13:13