1

简而言之，我正在寻找一种快速的方法来执行以下操作。
我想在下面格式化一个 excel 电子表格：

      A B C D
    1 foo bat abe 测试
    2 foo 蝙蝠猫测试
    3 foo 蝙蝠狗测试
    4 条哞帽女孩
    5 巴哞蝙蝠女孩

看起来像这样：

      A B C D
    1 foo bat abe，猫，狗测试
    2 bar moo 帽子，蝙蝠女孩

A、B、D 等列将在每一行中为每个唯一系列重复相同的数据。
在每一行中，C 列总是不同的。
C 列需要合并在一起，以逗号分隔。

欢迎大家提出意见。

4

1 回答 1

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

一次向下遍历列表一行，如果该行看起来匹配，则手动连接该值。否则，它只会下降一行。

于 2009-04-02T21:27:52.563 回答