Ver originales (Francés)

Gestión de formatos en un listbox

Resuelto
denisw95 Mensajes publicados 53 Estado Miembro -  
Ant049 Mensajes publicados 157 Estado Miembro -
Bonjour,

He creado un formulario con un ListBox que lleno con el siguiente código VB: 

 
 J = 0
 X = 0
 
 For I = ligne_deb To ligne_fin
 List_Catalogue(X, J) = Range(LettreColonne_deb & I).Value
 List_Catalogue(X, J + 1) = Range(LettreColonne_deb1 & I).Value
 List_Catalogue(X, J + 2) = Range(LettreColonne_deb2 & I).Value
 List_Catalogue(X, J + 3) = CCur(Range(LettreColonne_deb3 & I).Value)
 X = X + 1
 Next I
 
 Me.ListBox1.List = List_Catalogue


Cuando mi formulario se muestra, la columna 4 se muestra en formato de texto y no en formato de moneda.

¿Cómo puedo adaptar el formato de una columna en un listbox?

Gracias de antemano por su ayuda

Denis
Configuración: Windows / Chrome 46.0.2486.0

1 respuesta

  1.
    Ant049 Mensajes publicados 157 Estado Miembro 22
     
    Hola,

    No es posible "adaptar el formato de una columna en un listbox".
    Te aconsejo que cambies el formato de tus datos antes de agregarlos a tu listbox y luego los agregues.
    0
    1. denisw95 Mensajes publicados 53 Estado Miembro
       
      Gracias por tu respuesta

      Pero eso es lo que hago cuando lo integro en mi tabla antes de integrarlo en mi ListBox.
      0
    2. Ant049 Mensajes publicados 157 Estado Miembro 22
        


      List_Catalogue(X, J + 3) = Range(LettreColonne_deb3 & I).NumberFormat = "#,##0.00 $"
      0
      1. denisw95 Mensajes publicados 53 Estado Miembro > Ant049 Mensajes publicados 157 Estado Miembro
         
        Gracias por tu ayuda

        El comando exacto que funciona 


        List_Catalogue(X, J + 3) = Format(Range(LettreColonne_deb3 & I).Value, "#,##0.00 €")
        0
    3. Ant049 Mensajes publicados 157 Estado Miembro 22
       
      De nada, gracias por marcar el tema como resuelto.
      0