Data Consolidation

I have a spreadsheet with duplicate data in column 1 (Names of Customers). Each row contains the name of a customer and a record of their purchases, including a column for amounts. I have a VBA macro to eliminate the duplicate rows based on the names in Column 1 (see below). However, I want to consolidate the total purchases so that I end up with 1 row per customer and the total dollar value of their purchases in the cell for Amounts.

VBA:

Please Login or Register  to view this content.