Excel Sum和Group by inplace？

基本上我很乐意使用Pivote Table，但它无法正确显示。Excel Sum和Group by inplace？

说我有

+---------+---+-----+ 
    | A | B | C | 
    +-+---------+---+-----+ 
    |1| Date |Qty|Title| 
    +-+---------+---+-----+ 
    |2|4/01/2013|10 |Foo | 
    +-+---------+---+-----+ 
    |3|4/01/2013|20 |Foo | 
    +-+---------+---+-----+ 
    |4|4/01/2013|5 |Bar | 
    +-+---------+---+-----+ 
    |5|4/01/2013|5 |Test1| 
    +-+---------+---+-----+ 
    |6|4/01/2013|15 |Test2| 
    +-+---------+---+-----+

我需要实现：

+---------+---+-----+ 
    | A | B | C | 
    +-+---------+---+-----+ 
    |1| Date |Qty|Title| 
    +-+---------+---+-----+ 
    |2|4/01/2013|30 |Foo | 
    +-+---------+---+-----+ 
    |3|4/01/2013|5 |Bar | 
    +-+---------+---+-----+ 
    |4|4/01/2013|5 |Test1| 
    +-+---------+---+-----+ 
    |5|4/01/2013|15 |Test2| 
    +-+---------+---+-----+

与数据透视表的问题是，我似乎无法修复它想看起来像一个事实：

+---------+---+-----+ 
    | A | B | C | 
    +-+---------+---+-----+ 
    |1| Date |Qty|Title| 
    +-+---------+---+-----+ 
    |2|4/01/2013|30 |Foo | 
    +-+---------+---+-----+ 
    |3|   |5 |Bar | 
    +-+---------+---+-----+ 
    |4|   | |Test1| 
    +-+---------+---+-----+ 
    |5|   |15 |Test2| 
    +-+---------+---+-----+

因为这是被导入到一个脚本，我没有控制，使用各行各[R easons我需要所有信息。

来源

2013-04-01 user2140261

而不是VBA我会使用我的数据透视表旁边的公式来重复丢失的数据。所以公式将在D/E/F列中。 – whytheq

我想出了这

Sub Sum_And_Group() 

    For Each Title In Range("C2:C20") 
     If Title <> 0 Then 
      Do While Title.Offset(1, 0) = Title 
       Title.Offset(0, -1) = Title.Offset(0, -1) + Title.Offset(1, -1) 
       Title.Offset(1, 0).EntireRow.Delete 
      Loop 
     End If 
    Next 

    End Sub

它的工作，但似乎是不安全和肮脏。任何人都有更好的？

来源

2013-04-02 14:53:53 user2140261

应该有透视设置Repeat Item labels

选项从Excel 2010中（我没有2007年，不能肯定它在那里太）

enter image description here

来源

2013-04-02 08:44:56

2007年，该复选框不存在。 – user2140261

Excel Sum和Group by inplace？

回答

相关问题