Use a VLookup to return multiple values

Hi.
I'm seeking some assistance. I have a workbook with 2 sheets.
The sheet called 'data' contains all purchasers names (which do get repeated), the item they bought and 3 item costs, all in range A1:E15.
The 'lookup' sheet allows the user to enter a purchasers name in cell B1, then I want all the items that purchaser bought listed with the corresponding item costs.
I've attached a sample spreadsheet.
Thanks in advance for any assistance.
Kenneth.

See attached:

Formula in D1:

=COUNTIF(data!$A$2:$A$15,B1)

to give count of matches

Formula in A5:

=IF(ROWS($A$1:$A1)>$D$1,"",INDEX(data!B$2:B$15,SMALL(IF(data!$A$2:$A$15=$B$1,ROW(data!$A$2:$A$15)-ROW(data!$A$2)+1),ROWS($A$1:$A1))))

confirmed with CTRL+SHIFT+ENTER not just ENTER and copied down to extract first column of matching info.

Formula in B5:

=IF(A5="","",VLOOKUP($A5,data!$B$2:$E$15,COLUMNS($A$1:B$1),FALSE))

normally Entered and copied down and across the rest of the table.

Note: If you change data ranges in the formula in A5, you will need to re-confirm with CSE keys to get the { } brackets and then copy down...

Can you please mark your thread as Solved?

How to mark a thread Solved
Go to the first post
Click edit
Click Go Advanced
Just below the word Title you will see a dropdown with the word No prefix.
Change to Solved
Click Save