Une listview qui affiche des "???????"

Fermé
o.debbagh Messages postés 2 Date d'inscription vendredi 17 mai 2013 Statut Membre Dernière intervention 17 mai 2013 - 17 mai 2013 à 10:04
o.debbagh Messages postés 2 Date d'inscription vendredi 17 mai 2013 Statut Membre Dernière intervention 17 mai 2013 - 17 mai 2013 à 12:04
Bonjour les amis,
J''ai un souci, sachant que je suis un débutant en VBA je n'arrive pas à comprendre pourquoi les lettres arabe s'affiche correctement dans tous les contrôles excepte les listview.
Y a-t-il une solution pour ce problème.
voici une photo de mon projet :

http://img694.imageshack.us/img694/5163/sortie.png

Merci d'avance pour vos réponses enrichissantes

1 réponse

o.debbagh Messages postés 2 Date d'inscription vendredi 17 mai 2013 Statut Membre Dernière intervention 17 mai 2013
17 mai 2013 à 12:04
Re-Bonjour,
je souhaite donner plus d'explication :

je charge ma listview avec le code :




Private Sub UserForm_Initialize()
'Définit les entêtes de colonnes
    With ListView3
        With .ColumnHeaders
            .Clear 'Supprime les anciens entêtes
            
            'Ajout des colonnes
            .Add , , "Désignation", 252
            
        End With
    
    .View = lvwReport 'affichage en mode Rapport
    .Gridlines = True 'affichage d'un quadrillage
    .FullRowSelect = True 'Sélection des lignes complètes
    End With


nbcells = Sheets("Détails").Range("C15").Value + 3 'nombre d'article
  
        For v = 4 To nbcells
        
                rang3 = Sheets("Article_En_stock").Range("e" & v)
            
              ListView3.ListItems.Add = rang3
           
        Next

End Sub


les listItem à chargé dans la listview3 sont stocké dans une feuille( bien sûre le texte est afficher en arabe ), et quand je lance ma userforme, la listview affiche "????"

est ce que vous pouvez m'aider ?

merci d'avance
0