Move cells with pattern search and copy

I would like to achieve following in VBA

Input Workbook1 
Index   Value 
 1       a
 2       a
 3       b
 4       c
 5       a
 6       b
 7       a
 8       c

Output Workbook2

I would like to have output in following format so that I can generate graph with same X axis

Index   Value 1 Value 2     Value 3
1        a      
2        a      
3                b  
4                             c 
5        a      
6                b  
7        a      
8                             c