Agregar ítem a listbox en múltiples columnas

Hola,

Configuración: Windows XP / Chrome 30.0.1599.69

Estoy buscando alimentar un Listbox de 2 columnas a partir de una búsqueda por letra en un rango de datos (ciudad y código postal). Dado que el nombre de una ciudad puede tener varios códigos postales, quiero poder seleccionar la ciudad correcta, de ahí la visualización del código postal. Puedo mostrar la información si tengo solo una columna, pero no con 2. He realizado muchas pruebas, también con column. Puedo mostrar ambas informaciones en una columna si hago Me.Texte_4.AddItem c.Offset(1, 0) & " " & c.Offset(1, -1), pero eso no me sirve porque solo quiero recuperar uno de los dos valores, el nombre de la ciudad.
Estoy dando vueltas, convencido de que la solución es muy simple. Agradecería su ayuda para avanzar. Gracias de antemano.

Aquí está mi código:
dim rango

With Sheets("Tablas")
finCiudad = .Cells(Rows.count, "E").End(xlUp).Row
Set rango = .Range(.Cells(10, "E"), .Cells(finCiudad + 1, "E"))

For Each c In rango
If UCase(c) Like UCase(Me.TB_Letras) & "*" Then Me.Texte_4.AddItem
Me.Texte_4.List(, 0) = c.Offset(1, 0)
Me.Texte_4.List(, 1) = c.Offset(1, -1)

Next c
End With

End If