Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1 2 След.
RSS
Как развернуть комбинацию чисел, написанных через тире
 
#1
10.02.2015 12:26:08
В ячейке числа вводятся через тире : 40-45 (так быстрее и удобнее) Нужно, чтобы в другой это раскрывалось в 40,41,42,43,44,45.
 
 
 
#2
10.02.2015 12:30:22
Код
Function Expand(cell)
    Dim vHi, vLo, arr, r, s
    arr = Split(cell, "-")
    vLo = arr(0): vHi = arr(1)
    For r = vLo To vHi: s = s & r & ",": Next
    Expand = Left$(s, Len(s) - 1)
End Function
There is no knowledge that is not power
 
 
 
#3
10.02.2015 12:32:44
а нельзя формулой?  :)  Не очень я люблю макросы.. не понимаю их.)))))
 
 
 
#4
10.02.2015 12:34:29
Если числа двузначные можно ЛЕВСИМВ(А1;2), ПРАВСИМВ
Можно разбивать столбец по разделителю "-"
можно сделать замену "-" на","
Изменено: jey - 10.02.2015 12:38:11
 
 
 
#5
10.02.2015 12:35:14
Цитата
Honey пишет: Не очень я люблю макросы
Да? Ну попробуйте сделать формулой.
There is no knowledge that is not power
 
 
 
#6
10.02.2015 12:37:00
можно формулой разбивку в отдельные ячейки а потом собрать через сцепить
Лень двигатель прогресса, доказано!!!
 
 
 
#7
10.02.2015 12:38:06
Johny, огромное спасибо! :D
 
 
 
#8
10.02.2015 12:42:04
Цитата
Сергей пишет: можно формулой разбивку в отдельные ячейки а потом собрать через сцепить
Ого!
There is no knowledge that is not power
 
 
 
#9
10.02.2015 12:43:08
Не пойму, копирую в свой файл, формула отказывается работать. Форматы ячеек те же. Меняю лишь номер ячейки на нужный мне. Выходит ошибка #ИМЯ
 
 
 
#10
10.02.2015 12:43:57
Баловались... В какой теме - не помню.
Для желающих поиграться: массив из номеров (только виртуальный):
=СТРОКА(ИНДЕКС(A:A;ЛЕВБ(A1;ПОИСК("-";A1)-1)):ИНДЕКС(A:A;ПСТР(A1;ПОИСК("-";A1)+1;5)))
Возможно, сохранил у себя решение. Поищу. Но формула "не для слабонервных"   :)    
 
 
 
#11
10.02.2015 12:47:13
Сергей, У меня всегда разные числа, когда трехзначные, когда четырех-двух-однозначные. Можно ли сделать так, чтобы формула автоматически подбирала нужную комбинацию и раскрывала диапазон чисел...?
 
 
 
#12
10.02.2015 12:47:47
Цитата
Honey пишет: Выходит ошибка #ИМЯ
Дык у меня формула-то VBA-шная (т.н. UDF - User-Defined Function).  :D
There is no knowledge that is not power
 
 
 
#13
10.02.2015 12:52:02
так
Лень двигатель прогресса, доказано!!!
 
 
 
#14
10.02.2015 12:57:41
vikttur, мда))) Круто! А что именно мне менять под себя? Массив? Ячейку? У меня все такие вот числа через тире только на одной строке. Но столбцы разные. Плюс не во всех есть такая комбинация. Т.е. где-то надо где-то нет.
 
 
 
#15
10.02.2015 12:58:19
Если с разбивкой по ячейкам, то проще.
Одна из двух "сложных" формул:
=ЕСЛИ(G1="";"";ЕСЛИ(G1=--ПСТР($A1;ПОИСК("-";$A1)+1;5);"";G1+1))
 
 
 
#16
10.02.2015 12:58:54
Johny, и как мне ее себе добавить тогда))) И будет ли соблюдаться при этом условие, которое я описала в сообщении выше?
 
 
 
#17
10.02.2015 13:03:01
vikttur, как всегда кратко эт мы легких путей не ищем в доп к своему примеру в F1 сборка
Код
=ПОДСТАВИТЬ(СЦЕПИТЬ(G1;",";H1;",";I1;",";J1;",";K1;",";L1;",";M1;",";N1;",";O1;",";P1;",";Q1;",";R1;",";S1;",";T1;",";U1;",");",,";"")
Лень двигатель прогресса, доказано!!!
 
 
 
#18
10.02.2015 13:03:16
Цитата
Круто! А что именно мне менять под себя?
Ничего там менять не получится. Это заготовка.
Я показал только лишь формирование виртуального массива номеров.это для тех, кто захочет поупражняться.
 
 
 
#19
10.02.2015 13:51:55
vikttur, Вроде получилось! спасибо. Но все та же проблема... Он как бы должен определять цифры через тире (40-45) (в этом случае формула срабатывает) или нет 47,48 (в этом случае я делаю по ячейкам, как мне показали в предыдущей теме)
 
 
 
#20
10.02.2015 14:38:52
В начальном сообщении Вы об этом не говорили. А интерес уже убежал...
Делайте проверку на наличие тире или запятой.
 
 
 
#21
10.02.2015 17:38:20
vikttur, получилось вот так:
Код
=ЕСЛИ(ПОИСК("-";A12;1);--ЛЕВБ(A12;ПОИСК("-";A12)-1);"")
с числами через тире работает отлично, но не выдает "" при ошибке... просто ЗНАЧ. Пробовала вместо "" поставить
Код
 =СЖПРОБЕЛЫ(ПСТР(ПОДСТАВИТЬ(","&$A12;",";ПОВТОР(" ";50));СТОЛБЕЦ(D12)*50;50))
Ничего не выходит... не пойму почему выдает ошибку в значении...

И можете, объяснить пожалуйста, зачем в Вашей предложенной формуле перед ЛЕВБ стоит "--"?
Изменено: Honey - 10.02.2015 17:44:47
 
 
 
#22
10.02.2015 17:46:05
бинарное отрицание. преобразование в число. Подробнее в поиске, через день спрашивают.
Об ошибке - покажите. Быстрее понять на примере.
 
 
 
#23
10.02.2015 18:09:51
Просто у меня что с -- что без работает одинаково... только если в первом случае выравнивание по правому краю, то без -- по левому краю...)))
Изменено: Honey - 10.02.2015 18:11:03
 
 
 
#24
10.02.2015 19:02:33
Ошибка, потому что пытаетесь найти то, чего нет.
Код
=--ЛЕВБ(A1;МИН(ПОИСК({"-";","};A1&"-,"))-1)
=ЕСЛИ(G1="";"";ЕСЛИ(G1=--ПСТР($A1;МАКС(ПОИСК("-";ПОДСТАВИТЬ($A1;",";"-";2)))+1;5);"";G1+1))
Если возможно наличие НЕ двух запятых, нужно немного усложнить.
 
 
 
#25
10.02.2015 22:04:01
Цитата
Honey пишет: Не очень я люблю макросы.. не понимаю их.
А формулы, стало быть, понимаете. Тогда почему столько вопросов по готовым формулам? ))
 
 
 
#26
10.02.2015 23:16:57
Ещё один вариант.

Код
=IF(--MID($A1;SEARCH("-";$A1)+1;222)-(--LEFT($A1;SEARCH("-";$A1)-1)+COLUMN(A:A)-1)>=0;--LEFT($A1;SEARCH("-";$A1)-1)+COLUMN(A:A)-1;"")
 
 
 
#27
13.02.2015 19:24:19
Юрий М, совсем не понимаю макросы. С формулами уже имела дело))) Или тут нельзя спрашивать? :D
vikttur,jakim, спасибо попробую в понедельник! =)
 
 
 
 
#28
14.02.2015 10:46:03
Honey, м.б. поделитесь, зачем Вам преобразовывать 40-45 в 40,41,42,43,44,45 ?
Вар. формулы для яч.H1 =(МАКС($G$2:G2)<--ПСТР($A1;ПОИСК("-";$A1)+1;5))*(G2+1) и протянуть вправо
Всё сложное - не нужно. Всё нужное - просто /М. Т. Калашников/
 
 
 
#29
14.02.2015 11:45:57
А можно поинтересоваться почему так удобнее через тире, это что диапазон возраста или счетов? Просто хочу понять суть Ваших манипуляций возможно Вам не нужно будет так вводить 41-45. Для решения проблеммы можно найти много способов и очень даже красивых и "эргономичных". Почему эргономичных, чтоб пальцы и мозг работали оперативно :)
 
 
 
#30
14.02.2015 12:04:29
ВПР. Мне нужно, чтобы если нужно найти значение за число 42, ВПР нашел его в ячейке, где привыкли заполнять 20-45, а не перечислять 20,21,22,23,,,,,45
 
 
 
Страницы: 1 2 След.
Наверх