It's a job done in seconds using Power Query.
Here's the M code:
let
Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
#"Changed Type" = Table.TransformColumnTypes(Source,{{"Column1", type text}, {"Column2", type text}, {"Column3", type any}}),
#"Reordered Columns" = Table.ReorderColumns(#"Changed Type",{"Column2", "Column1", "Column3"}),
#"Pivoted Column" = Table.Pivot(#"Reordered Columns", List.Distinct(#"Reordered Columns"[Column1]), "Column1", "Column3")
in
#"Pivoted Column"
Excel 2016 (Windows) 32 bit
|
A |
B |
C |
D |
1 |
Column2 |
Account 1 |
Account 2 |
Account 3 |
2 |
A |
1.6.10.3 |
3 |
4.5 |
3 |
B |
1.6 |
3.1 |
4.6 |
4 |
C |
1.7 |
3.2 |
4.7 |
5 |
D |
1.8 |
3.3 |
4.8 |
6 |
E |
1.9 |
3.4 |
4.9 |
7 |
F |
2 |
3.5 |
5 |
8 |
G |
2.1 |
3.6 |
5.1 |
9 |
H |
2.2 |
3.7 |
5.2 |
10 |
I |
2.3 |
3.8 |
5.3 |
11 |
J |
2.4 |
3.9 |
5.4 |
12 |
K |
2.5 |
4 |
5.5 |
13 |
L |
2.6 |
4.1 |
5.6 |
14 |
M |
2.7 |
4.2 |
5.7 |
15 |
N |
2.8 |
4.3 |
5.8 |
16 |
O |
2.9 |
4.4 |
5.9 |
Bookmarks