Listbox con la opción transponer datos.

Saludos a todos.

Tengo un listbox con un filtrado de datos, pero los datos quiero transponerlo. Os pongo un pequeño ejemplo:

Celda a Celda B Celda C Celda D

NUMERO NOMBRE 13-02-13 13-03-13

122 COMUNIDAD VISITADO CONTACTADO

124 JOSE TELEFONEADO RESPONDIDIO

Quiero que salga para el primer número:

13-02-13 VISITADO

13-03-13 CONTACTADO.

Adjunto fichero excel con el listbox creado, lo único que me falta es transponer los datos y a ser posible con una cabecera FECHA GESTION REALIZADA.

Gracias por vuesta lectura.

Se me olvidaba el listbox se ejecutado con doble click en una celda de la columna A

Listbox.zip