Hi

You can do this with a macro. I can't think how to do this in one go yet but
this macro will add to the person first line in stages so keep running it
until the the number of changes stays constant. You'll be told this.

Sub t()
Dim i As Long, nr As Long, col As Integer, nc As Integer
Dim c, d As String, tmp, count As Long, inf
Range("A1").Select
nr = Range("A1").CurrentRegion.Rows.count
nc = Range("A1").CurrentRegion.Columns.count
count = 0
'copy data to top row of each person
For i = 2 To nr
 tmp = i
   c = Cells(i, 1) & Cells(i, 2) & Cells(i, 3)
   d = Cells(i + 1, 1) & Cells(i + 1, 2) & Cells(i + 1, 3)

   If c = d Then
     For j = 4 To nc
       If IsEmpty(Cells(tmp, j)) Then
         Cells(tmp, j) = Cells(i + 1, j)
         count = count + 1
       End If
     Next j
   End If
Next i
inf = MsgBox("Changes Made: " & count, vbDefaultButton1, "Changes made to
sheet")
End Sub

When you are happy use the next sub to delete the dupilcate rows. Only once
will do.

Sub DelDupes()
Dim i As Long, nr As Long, col As Integer, nc As Integer
Dim c, d As String, tmp
Range("A1").Select
nr = Range("A1").CurrentRegion.Rows.count
nc = Range("A1").CurrentRegion.Columns.count
'copy data to top row of each person
For i = nr To 2 Step -1
 tmp = i
   c = Cells(i, 1) & Cells(i, 2) & Cells(i, 3)
   d = Cells(i - 1, 1) & Cells(i - 1, 2) & Cells(i - 1, 3)
   If c = d Then
     Range(Cells(i, 1), Cells(i, nc)).Delete
   End If
Next i
End Sub

OPen the VB Editor (ALT + F11), >Insert >Module and copy the code into the
Module. the code will work on the active sheet in the workbook. Place the
cursor into Sub T and press F5 to run the code.
Do not run the DelDupes until you are happy with the results. Perhaps you
can copy the workbook and use this.

Regards
Peter

Perhaps this approach?

Example:
A1:G11 contains this list, where (blank) means a blank cell:

First    Last    Grp_1    Grp_2    Grp_3    Grp_4    Grp_5
Arnold    Baggins    SignedUp    (blank)    (blank)    (blank)    (blank)
Arnold    Baggins    (blank)    (blank)    (blank)    (blank)    (blank)
Arnold    Baggins    (blank)    (blank)    (blank)    (blank)    (blank)
Arnold    Baggins    (blank)    (blank)    (blank)    SignedUp    (blank)
Arnold    Baggins    (blank)    (blank)    (blank)    (blank)    SignedUp
Oprah    Lohan    SignedUp    (blank)    (blank)    (blank)    (blank)
Oprah    Lohan    (blank)    SignedUp    (blank)    (blank)    (blank)
Oprah    Lohan    (blank)    (blank)    SignedUp    (blank)    (blank)
Oprah    Lohan    (blank)    (blank)    (blank)    SignedUp    (blank)
Oprah    Lohan    (blank)    (blank)    (blank)    (blank)    SignedUp

Select A1:G11

From the Excel main menu:
<Data><Pivot Table>
Use: Excel
Select your data if not already selected
Click the [Layout] button

ROW:
Drag the "First" field here
Drag the "Last" field here

DATA:
Drag the Grp_1, Grp_2, Grp_3, Grp_4, and Grp_5 fields here.
They'll all list as Count of Grp_1, Count of Grp_2, etc
Click [OK]

Select where you want the Pivot Table...and click the [Finish] button.

Not quite there yet (as I'm sure you noticed)

Finally....Drag the "DATA" field over the "Total" field...and release it.

Now the Pivot Table looks like this (I abbreviated to avoid text wrap):

First    Last    Ct_Grp1    Ct_Grp2    Ct_Grp3    Ct_Grp4    Ct of Grp5
Arnold    Baggins    1            1    1
Oprah    Lohan    1    1    1    1    1

Is that something you can work with?

***********
Regards,
Ron

XL2002, WinXP