Как отделить список, разделенный запятой, на два столбца в Excel?

У меня длинный список с запятыми, который выглядит так в Excel:

401.50,0.027 402.00,0.028 402.50,0.029 403.00,0.031 403.50,0.032 404.00,0.034 404.50,0.037 

Есть ли простой способ конвертировать это в два отдельных столбца? Есть более 800 значений, и я действительно не ожидаю разделения их по отдельности.

  • Как я могу отобразить URL-адрес в качестве изображения в ячейке excel?
  • Как настроить автозаполнение в excel2010
  • Сравните ячейки в двух разных таблицах и извлеките данные из одного места в другое, если совпадение найдено
  • Excel: как внутренне хранить числовое значение в ячейке, но сделать ее по-разному (например, алфавитные имена)?
  • Формула Excel для среднесуточной прибыли
  • Прекратите открывать новую книгу при запуске Excel
  • Преобразовать столбец в список, разделенный запятыми
  • Excel - столбцы для одной ячейки
  • 3 Solutions collect form web for “Как отделить список, разделенный запятой, на два столбца в Excel?”

    Вы пытались использовать Text to Columns ?

    1. Выделите столбец, содержащий ваш список.
    2. Перейдите в Data > Text to Columns .
    3. Выберите « Разграничено» . Нажмите « Далее» .
    4. Выберите Запятая . Нажмите « Далее» .
    5. Выберите « Общие» или « Текст» , в зависимости от того, что вы предпочитаете.
    6. Оставить пункт назначения как есть или выбрать другой столбец. Нажмите « Готово» .

    Вы также можете использовать две формулы в двух отдельных столбцах.

    Чтобы получить значения слева от запятой:

     =0+LEFT(K1,FIND(",",K1)-1) 

    Чтобы получить значения справа от запятой:

     =0+RIGHT(K1,LEN(K1)-FIND(",",K1)) 

    Где K1 содержит начальную строку, такую ​​как 401.50,0.027

    ** 0+ до того, как формулы преобразуют извлеченные подстроки в числовые данные.

    Копировать / Вставить текст в текстовый редактор Заменить все пробелы символами carriagereturn / linefeeds Сохранить как файл TXT. Откройте файл в Excel.

    Напишите немного vba для обработки списка

    Это предполагает, что список значений находится в одной ячейке и выбран. Выдает результаты в следующих ячейках

     Sub zx() Dim a() As String Dim v As Variant Dim i As Long Dim j As Long a = Split(ActiveCell.Value, " ") ReDim v(1 To UBound(a) + 1, 1 To 2) For i = 1 To UBound(a) + 1 j = InStr(a(i - 1), ",") v(i, 1) = Val(Left(a(i - 1), j - 1)) v(i, 2) = Val(Mid(a(i - 1), j + 1)) Next ActiveCell.Offset(1, 0).Resize(UBound(a) + 1, 2) = v End Sub 
    Interesting Posts
    Давайте будем гением компьютера.