Gestion des formats dans une listbox

Résolu/Fermé

denisw95 Messages postés 47 Date d'inscription vendredi 18 décembre 2009 Statut Membre Dernière intervention 3 mai 2020 - 10 août 2016 à 12:02
Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016 - 10 août 2016 à 13:40

Bonjour,

J'ai crée un formulaire avec une ListBox que je renseigne avec le code VB ci-après :

   
    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

Lorsque mon formulaire s'affiche, la colonne 4 est affiché en format texte et non pas Currency.

Comment faire pour adapter le format d'une colonne dans une listbox ?

Merci d'avance pour votre aide

Denis

A voir également:

Gestion des formats dans une listbox
Logiciel gestion photo gratuit - Guide
Logiciel gestion locative gratuit excel - Télécharger - Comptabilité & Facturation
Logiciel gestion cave à vin gratuit excel - Télécharger - Cuisine & Gastronomie
Gestion autorisation application android - Guide
Logiciel gestion association gratuit excel - Télécharger - Gestion de projets

1 réponse

Réponse 1 / 1

Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016 22
10 août 2016 à 12:17

Bonjour,

Il n'est pas possible d'"adapter le format d'une colonne dans une listbox".
Je te conseille de changer le format de tes données avant de les rajouter à ta listbox puis de les rajouter.

denisw95 Messages postés 47 Date d'inscription vendredi 18 décembre 2009 Statut Membre Dernière intervention 3 mai 2020
10 août 2016 à 13:03

Merci de ton retour

Mais c'est ce que je fais lorsque je l'intègre dans ma table avant intégration dans ma ListBox

Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016 22
10 août 2016 à 13:14

Essaye de changer ton format avec un code comme celui là :

List_Catalogue(X, J + 3) = Range(LettreColonne_deb3 & I).NumberFormat = "#,##0.00 $"

denisw95 Messages postés 47 Date d'inscription vendredi 18 décembre 2009 Statut Membre Dernière intervention 3 mai 2020 > Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016
10 août 2016 à 13:33

Merci pour ton aide

La commande exacte qui fonctionne


List_Catalogue(X, J + 3) = Format(Range(LettreColonne_deb3 & I).Value, "#,##0.00 €")

Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016 22
10 août 2016 à 13:40

De rien, merci de mettre le topic en résolu

Discussions similaires

Je cherche un bon Sujet de l'informatique de gestion g3

tfc pour systeme informatique de gestion