Return Unique Values in New Workbook

[Kehoth01]

Hi,

I have a worksheet that contains a set of data, but the first three columns (A:C) need to be summarized on a daily basis in a new workbook and I have been struggling in putting it all together in "stable" VBA code.

I attached an example with sample data and my desired output. The data is tracking truck loads.

Column A contains a date (always the same for every row), column B a Driver's Name, and Column C holds a unique BOL number (always associated to a driver)

In short, I am basically replicating a pivot table output, listing the date in column A, the unique driver names in Column B, and then listing the BOLs for that driver in columns adjacent to the driver name, starting with Column C in a new workbook.

If possible, I'd like to name the new workbook Cleburne Driver Loads + Date listed....so "Cleburne Driver Loads 11.19.14" in this example.

Any help would be appreciated.


Macro Example.xlsm

[AlanY]

your summary is in green, the yellow cells are ARRAY{} with Control-Shift-Enter to input.

couldn't find a way to tidy it up with the IFERROR and ARRAY{} formula, may be someone else can help

[Kehoth01]

Thank you for the help, but I need the unique data exported to a new WorkBook, so formulas will not work.

[MarvinP]

Put this formula in I17 and pull it across and down... CSE formula...

=IFERROR(INDEX($C$1:$C$51,SMALL(IF($B$1:$B$51=$H$17,ROW($B$1:$B$51),""),COLUMN(I17)-8),1),"")

[Kehoth01]

Thank you but I believe I need this to be macro based in-order for it to be outputted into a new Workbook.

[AlanY]

isn't just as easy to copy the summary and paste values to the new workbook?