Move data from rows into columns for every unique value

[Admin]

Hi

All are ARRAY formulas.

In A21:

=SUM(IF(FREQUENCY(MATCH(B3:B19,B3:B19,0),ROW(B3:B1 9)-ROW(B3)+1),1))

A23 and copied down:

=IF(ROWS($A$23:A23)<=$A$21,INDEX($B$3:$B$19,MATCH( 0,COUNTIF($A$22:A22,$B$3:$B$19),0)),"")

B23 and copied across:

=IF(COLUMNS($B23:B23)<=COUNTIF($B$3:$B$19,$A23),IN DEX($A$3:$A$19,SMALL(IF($B$3:$B$19=$A23,ROW($B$3:$ B$19)-ROW($B$3)+1),COLUMNS($B23:B23))),"")

Please find attached.