Make an excel table sort diffrently

[KSADolphin]

here is my original spreadsheet

01/07/2016				Maier, Sabine				winter appeal		100.00
01/08/2016				Richter, Judy				winter appeal		100.00
01/08/2016				Salem, Margo				winter appeal		25.00
01/08/2016				Andrew, Samuel				winter appeal		500.00
04/05/2016				Maier, Sabine				spring appeal		75.00
04/05/2016				Richter, Judy				spring appeal		50.00
04/05/2016				Salem, Margo				spring appeal		50.00
04/05/2016				Andrew, Samuel				spring appeal		100.00
07/01/2016				Maier, Sabine				gala		75.00
01/07/2016				Richter, Judy				gala		50.00
01/07/2016				Salem, Margo				gala		50.00
01/07/2016				Andrew, Samuel				gala		100.00

<colgroup><col><col><col><col><col><col><col><col><col><col><col></colgroup><tbody>
</tbody>

I would like it to be like this
winter appeal spring appeal gala

Maier, Sabine 100.00 75.00 75.00

Richter, Judy 100.00 50.00 50.00

Salem, Margo 25.00 50.00 25.00

Andrew, Samuel 500.00 100.00 100.00 any chance? THANKSSSSSSSSSSSS

<tbody>
</tbody>

 

[Michael M]

you'll probably need VBA to do this
Try this on a copy of your worksheet

Sub MM1()
Dim lr As Long, r As Long
lr = Cells(Rows.Count, "A").End(xlUp).Row
    Sheets("Sheet1").Sort.SortFields.Add Key:=Range("B2"), SortOn:=xlSortOnValues
    With Sheets("Sheet1").Sort
        .SetRange Range("A1:D" & lr)
        .Header = xlNo
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
For r = lr To 2 Step -1
    If Range("B" & r).Value = Range("B" & r - 1).Value Then
        Range("D" & r - 1).Value = Range("D" & r - 1).Value & " " & Range("D" & r).Value
    Rows(r).Delete
    End If
Next r
End Sub

 

[frank_AL]

The simplest way that would get very close to what you are showing would be to create a Pivot Table.