Объединение и форматирование в Excel

Проще говоря, я ищу быстрый способ сделать следующее.
Я хотел бы отформатировать электронную таблицу Excel ниже:

      A     B     C     D
    1 foo   bat   abe   test
    2 foo   bat   cat   test
    3 foo   bat   dog   test
    4 bar   moo   hat   girl
    5 bar   moo   bat   girl

выглядеть так:

      A     B     C               D
    1 foo   bat   abe, cat, dog   test
    2 bar   moo   hat, bat        girl

Столбцы A, B, D и т. д. будут повторять одни и те же данные для каждой уникальной серии в каждой строке.
В каждой строке столбец C всегда будет другим.
Столбец C необходимо будет объединить вместе, разделив запятыми.
>

Любые предложения будут приветствоваться.


person user86417    schedule 02.04.2009    source источник


Ответы (1)


Вы могли бы использовать VBA, но я не уверен, соответствует ли это вашему определению «простой». Что-то типа:

Range("C1").Select
Do Until Activecell.Formula = ""
   ''if my row matches the row below
   If  ActiveCell.Offset(0,-2).Value = ActiveCell.Offset(1,-2).Value _
   And ActiveCell.Offset(0,-1).Value = ActiveCell.Offset(1,-1).Value _
   And ActiveCell.Offset(0, 1).Value = ActiveCell.Offset(1, 1).Value Then
       ''merge and collapse
       Activecell.Formula = ActiveCell.Formula & ", " & _
                            ActiveCell.Offset(1,0).Formula
       ActiveCell.Offset(1,0).EntireRow.Delete
   Else
      ''Go down a row
       ActiveCell.Offset(1,0).Select
   End If
Loop

Проходит вниз по списку по одной строке за раз и вручную объединяет значение, если строка совпадает. В противном случае он просто идет вниз по строке.

person BradC    schedule 02.04.2009