Повторное преобразование содержимого одной ячейки в несколько с заголовками

У меня есть экспорт заказов из интернет-магазина, который экспортирует переменные как одну ячейку в CSV-файле.

tier: Elite | division: Male/Male Team | captain shirt size: Large | teammate shirt size: XLarge | Team Name: Terrible 2's | Participant/Volunteer Waiver & Liability Release Captain's Full Name: Craig Carroll | Participant/Volunteer Waiver & Liability Release Teammate's Full Name: Ashley Carroll | Waiver & Release of All Claims & Assumption of Risk Captain's Intials: cc | Waiver & Release of All Claims & Assumption of Risk Teammate's Initials: ac | Age Requirement: Yes 

Это то, что он экспортирует в одну ячейку. Есть ли способ сделать слово, предшествующее: стать заголовком, как в A1, и текст, предшествующий | стать значением в A2? Я играл с функцией text to columns, но он создает ячейки, отформатированные как tier:Elite и так далее. Любые предложения по решению для 400 заказов или позиций?

оригинал оригинал

ожидание ! [Ожидание

и так далее

Я бы рекомендовал следующие шаги:

  • Используйте текст для столбцов, как вы упомянули в | как разделитель
  • Затем транспонируйте данные вниз (выделите строку, скопируйте, выберите ячейку для вставки, а затем отредактируйте специальную транспозицию)
  • Когда транспонированные данные снова используют текст для столбцов, на этот раз с : в качестве разделителя

Данные будут в формате:

 tier Elite division Male/Male Team captain shirt size Large teammate shirt size XLarge Team Name Terrible 2's ... 

(Показывали только первые пять строк, так как в других строках много текста)

Этот макрос предполагает, что исходные данные находятся в столбце A листа 1 . Реорганизованные данные будут помещены в Sheet2 :

 Sub ReOrganize() Dim N As Long, i As Long, K As Long N = Cells(Rows.Count, "A").End(xlUp).Row K = 1 For i = 1 To N ary = Split(Cells(i, "A").Value, "|") For Each a In ary bry = Split(a, ":") With Sheets("Sheet2") .Cells(K, 1).Value = bry(0) .Cells(K, 2).Value = bry(1) K = K + 1 End With Next a Next i End Sub 

введите описание изображения здесь

  • Нежелательные запятые, вставленные в CSV-файл после редактирования в Excel
  • CSV не создает должным образом использование outputStreamWriter
  • excel load save csv file messes с форматом
  • Экспорт данных в CSV-Excel VBA
  • Сохранение данных Excel в виде csv с помощью VBA - удаление пустых строк в конце файла для сохранения
  • Как читать файл XLS и преобразовывать его в формат CSV
  • Как обращаться с типом ms csv на машине Windows
  • Highcharts: Могу ли я экспортировать пользователю Excel или CSV необработанных данных, ведущих диаграмму?
  • Экспорт конкретных столбцов из Excel в .csv Powershell
  • Удаление символов Unicode из CSV-файлов
  • Попытка удалить строки из файла с помощью sed - что я делаю неправильно?
  • Interesting Posts

    Обновление источника данных для нескольких сводных таблиц (в разных листах) в Excel

    openpyxl – Итерация по столбцам и строкам для захвата данных из середины листа

    Формула должна вернуть значение, если дата находится в пределах 1 месяца

    Удаление определенного месяца с определенного года в Excel с помощью VBA

    Python 2.7.13 с использованием openpyxl – ошибка при доступе к ячейкам

    Создание подписок на основе второго столбца в excel

    Написание списка для Excel

    Вставка строки в ссылку ячейки

    ошибка времени выполнения 9 – индекс вне диапазона при копировании семестра в новую wrokbook

    Использование Excel-источника на компьютере без excel, установленного в SSIS

    java-файл только последние данные, вставленные в файл

    QLPreviewController с несколькими листами Excel и документами iOS 6

    Не удается установить книгу

    Скрипт / макрос, который ищет, если пара значений поиска (в столбце D, E) существует в массиве поиска (в столбце A, B)

    Таблица экспорта Php для Excel

    Давайте будем гением компьютера.