разделение информации по разным столбцам
sprandi5
Дата: Понедельник, 25.03.2013, 18:07 |
Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 16
Репутация:
0
±
Замечаний:
0% ±
Есть информация! её нужно отсеять и в столбцы вбить только числа(итог игры)! данная информация выделена красным а нужная в итоговом результате должна быть как на жёлтом фоне! что для этого нужно сделать?
Есть информация! её нужно отсеять и в столбцы вбить только числа(итог игры)! данная информация выделена красным а нужная в итоговом результате должна быть как на жёлтом фоне! что для этого нужно сделать? sprandi5
Ответить
Сообщение Есть информация! её нужно отсеять и в столбцы вбить только числа(итог игры)! данная информация выделена красным а нужная в итоговом результате должна быть как на жёлтом фоне! что для этого нужно сделать? Автор - sprandi5 Дата добавления - 25.03.2013 в 18:07
AlexM
Дата: Понедельник, 25.03.2013, 18:30 |
Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4517
Репутация:
1129
±
Замечаний:
0% ±
Excel 2003
Я бы сделал так. С помощью Поиска и Замена заменил в столбце Е ПробелДвоеточиеПробел на ^ Затем Данные-Текст по столбцам. Разделитель ^
Я бы сделал так. С помощью Поиска и Замена заменил в столбце Е ПробелДвоеточиеПробел на ^ Затем Данные-Текст по столбцам. Разделитель ^ AlexM
Номер мобильного модема (без голосовой связи) 9269171249 МегаФон, Московский регион.
Ответить
Сообщение Я бы сделал так. С помощью Поиска и Замена заменил в столбце Е ПробелДвоеточиеПробел на ^ Затем Данные-Текст по столбцам. Разделитель ^ Автор - AlexM Дата добавления - 25.03.2013 в 18:30
sprandi5
Дата: Понедельник, 25.03.2013, 18:40 |
Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 16
Репутация:
0
±
Замечаний:
0% ±
Я бы сделал так. С помощью Поиска и Замена заменил в столбце Е ПробелДвоеточиеПробел на ^ Затем Данные-Текст по столбцам. Разделитель ^ И это что каждый раз так делать как нужно будет вставлять другую информацию в те же столбцы?
Я бы сделал так. С помощью Поиска и Замена заменил в столбце Е ПробелДвоеточиеПробел на ^ Затем Данные-Текст по столбцам. Разделитель ^ И это что каждый раз так делать как нужно будет вставлять другую информацию в те же столбцы? sprandi5
Ответить
Сообщение Я бы сделал так. С помощью Поиска и Замена заменил в столбце Е ПробелДвоеточиеПробел на ^ Затем Данные-Текст по столбцам. Разделитель ^ И это что каждый раз так делать как нужно будет вставлять другую информацию в те же столбцы? Автор - sprandi5 Дата добавления - 25.03.2013 в 18:40
AlexM
Дата: Понедельник, 25.03.2013, 18:57 |
Сообщение № 4
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4517
Репутация:
1129
±
Замечаний:
0% ±
Excel 2003
Цитата (sprandi5 )
что для этого нужно сделать
Я же ответил на ваш вопрос. Пожеланий, как сделать не было. (п.2 Правил форума)
Цитата (sprandi5 )
что для этого нужно сделать
Я же ответил на ваш вопрос. Пожеланий, как сделать не было. (п.2 Правил форума)AlexM
Номер мобильного модема (без голосовой связи) 9269171249 МегаФон, Московский регион.
Сообщение отредактировал AlexM - Понедельник, 25.03.2013, 19:00
Ответить
Сообщение Цитата (sprandi5 )
что для этого нужно сделать
Я же ответил на ваш вопрос. Пожеланий, как сделать не было. (п.2 Правил форума)Автор - AlexM Дата добавления - 25.03.2013 в 18:57
AlexM
Дата: Понедельник, 25.03.2013, 19:31 |
Сообщение № 5
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4517
Репутация:
1129
±
Замечаний:
0% ±
Excel 2003
Решение макросом. Записан макрорекордером и малость "причесан". [vba]Код
Sub Macros() Columns("E:E").Replace What:=" : ", Replacement:="^", LookAt:=xlPart, SearchOrder:=xlByRows Columns("E:E").TextToColumns Destination:=Range("E1"), DataType:=xlDelimited, TextQualifier:=xlNone, _ Other:=True, OtherChar:="^", FieldInfo:=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True Columns("E:F").Interior.ColorIndex = 6 End Sub
[/vba]
Решение макросом. Записан макрорекордером и малость "причесан". [vba]Код
Sub Macros() Columns("E:E").Replace What:=" : ", Replacement:="^", LookAt:=xlPart, SearchOrder:=xlByRows Columns("E:E").TextToColumns Destination:=Range("E1"), DataType:=xlDelimited, TextQualifier:=xlNone, _ Other:=True, OtherChar:="^", FieldInfo:=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True Columns("E:F").Interior.ColorIndex = 6 End Sub
[/vba] AlexM
Номер мобильного модема (без голосовой связи) 9269171249 МегаФон, Московский регион.
Ответить
Сообщение Решение макросом. Записан макрорекордером и малость "причесан". [vba]Код
Sub Macros() Columns("E:E").Replace What:=" : ", Replacement:="^", LookAt:=xlPart, SearchOrder:=xlByRows Columns("E:E").TextToColumns Destination:=Range("E1"), DataType:=xlDelimited, TextQualifier:=xlNone, _ Other:=True, OtherChar:="^", FieldInfo:=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True Columns("E:F").Interior.ColorIndex = 6 End Sub
[/vba] Автор - AlexM Дата добавления - 25.03.2013 в 19:31
jakim
Дата: Понедельник, 25.03.2013, 20:17 |
Сообщение № 6
Группа: Друзья
Ранг: Старожил
Сообщений: 1216
Репутация:
316
±
Замечаний:
0% ±
Excel 2010
Предлагаю такой вариант.
jakim
Ответить
Сообщение Предлагаю такой вариант.
Автор - jakim Дата добавления - 25.03.2013 в 20:17
_Boroda_
Дата: Понедельник, 25.03.2013, 20:30 |
Сообщение № 7
Группа: Админы
Ранг: Местный житель
Сообщений: 16718
Репутация:
6505
±
Замечаний:
±
2003; 2007; 2010; 2013 RUS
Цитата (jakim )
Предлагаю такой вариант.
Немного подправлю - в маловероятном, но теоретически возможном случае, когда счет, например, 100 : 9, второй столбец считается неверно. а вот так вроде нормально Код
=ЛЕВСИМВ(E1;ПОИСК(":";E1)-2)
Код
=ПОДСТАВИТЬ(E1;G1&" : ";"")
Цитата (jakim )
Предлагаю такой вариант.
Немного подправлю - в маловероятном, но теоретически возможном случае, когда счет, например, 100 : 9, второй столбец считается неверно. а вот так вроде нормально Код
=ЛЕВСИМВ(E1;ПОИСК(":";E1)-2)
Код
=ПОДСТАВИТЬ(E1;G1&" : ";"")
_Boroda_
Скажи мне, кудесник, любимец ба’гов... Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
Ответить
Сообщение Цитата (jakim )
Предлагаю такой вариант.
Немного подправлю - в маловероятном, но теоретически возможном случае, когда счет, например, 100 : 9, второй столбец считается неверно. а вот так вроде нормально Код
=ЛЕВСИМВ(E1;ПОИСК(":";E1)-2)
Код
=ПОДСТАВИТЬ(E1;G1&" : ";"")
Автор - _Boroda_ Дата добавления - 25.03.2013 в 20:30
jakim
Дата: Понедельник, 25.03.2013, 21:14 |
Сообщение № 8
Группа: Друзья
Ранг: Старожил
Сообщений: 1216
Репутация:
316
±
Замечаний:
0% ±
Excel 2010
Немножко подправил формулы
Код
=LEFT(E1;SEARCH(":";E1;1)-1)
Код
=TRIM(MID(E1;SEARCH(":";E1;1)+1;5))
Немножко подправил формулы
Код
=LEFT(E1;SEARCH(":";E1;1)-1)
Код
=TRIM(MID(E1;SEARCH(":";E1;1)+1;5))
jakim
Ответить
Сообщение Немножко подправил формулы
Код
=LEFT(E1;SEARCH(":";E1;1)-1)
Код
=TRIM(MID(E1;SEARCH(":";E1;1)+1;5))
Автор - jakim Дата добавления - 25.03.2013 в 21:14