ayuda con codigo VBA

Hola tengo un problema sobre como formatear una tabla que tengo en excel, te explico la idea; tengo una tabla con el siguiente formato:
codigo        fono         ciudad
40459132 12563892 Lima
40459132 13640011 Lima
40459132 199456231 Lima
10256874 13566741 Caracas
10256874 12569874 Caracas
y deseo pasarlo a este formato
codigo        fono1            fono2       fono3           ciudad
40459132  12563892    13640011 199456231  Lima
10256874  13566741    12569874                     Caracas
Podrías apoyarme con algún codigo en VBA para poder hacer el cambio de formato, no es necesario que el cambio se haga en la misma hoja, para que no sea complicado, se puede tener por ejemplo, la tabla original en la hoja 1 y la tabla formateada en la hoja2, espero que puedas ayudarme, gracias...

lo que pasa es que quiero ordenarlo para poder consolidarlo en una base de datos de access y asi poder tener una sola fila o registro por persona, lo del pivot table podrías explicarme en que consiste?

Ah ok, si se lo de la tabla dinamica solo que no lo ubicaba por ese nombre, bueno gracias de todas formas.