[XL-2003] Ignore commande lvwColumnCenter [Résolu]

[Cocotte278]

Bonjour ,

Je travaille dans une ListView et je souhaite centrer toutes mes données.

J'ai donc écrit le code suivant :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
With ListView1
    With .ColumnHeaders
        ' Vider le listview
        .Clear
        'Ajouter les colonnes
        .Add , , " ", , lvwColumnCenter
        .Add , , " ", , lvwColumnCenter
        .Add , , " ", , lvwColumnCenter
        .Add , , " ", , lvwColumnCenter
        .Add , , " ", , lvwColumnCenter
        .Add , , " ", , lvwColumnCenter
        .Add , , " ", , lvwColumnCenter
        .Add , , " ", , lvwColumnCenter
    End With
End With

Le souci : rien ne se passe au niveau du centrage de mes données.
J'ai aussi essayé en ajoutant une largeur de colonne mais rien non plus...

Que puis-je faire ?

Merci d'avance

[Gestionnaire_rh]

Bonjour Cocotte278,

je pense que avec ton code tu est entrain de centré sur la ligne des entêtes car tu as rajouter au début:

Code :

 with .ColumnHeaders

, essayé de mettre le code en rajoutant, et puis donner la largeur souhaiter (50 ou 100 ou 200....etc):

Code :

listview1.Add , , " ",50, lvwColumnCenter

Cordialement.

[Cocotte278]

Je ne pense pas que le problème vienne de là.

D'après mes recherches, il s'agirait peut-être d'une référence dans la bibliothèque qui n'est pas activée. Mais je ne vois pas laquelle ni comment obtenir la bonne...

Parce que même en en-tête il ne fonctionne pas !

[jacques_jean]

Bonjour,

Peut-être regarder ici :
http://silkyroad.developpez.com/VBA/ListView/

Le contrôle ListView fait partie des Common Controls Visual Basic 6.0 (mscomctl.ocx).

[Cocotte278]

Merci Jean-Jacques.

J'ai rajouté à ma bibliothèque les Common Controls Visual Basic 6.0 (mscomctl.ocx).

maintenant, j'ai une erreur 35604 : la première colonne d'un contrôle ListView doit être alignée à gauche !!!

J'ai mis le code :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
With ListView1
    With .ColumnHeaders
        ' Vider le listview
        .Clear
        'Ajouter les colonnes
        .Add , , " ", , lvwColumnLeft
        .Add , , " ", , lvwColumnCenter
        .Add , , " ", , lvwColumnCenter
        .Add , , " ", , lvwColumnCenter
        .Add , , " ", , lvwColumnCenter
        .Add , , " ", , lvwColumnCenter
    End With
End With

Mais, ça ne fonctionne pas (toujours le même message...) !

Une idée ?

Merci

[Gestionnaire_rh]

Bonjour,

ton code marche le plus normalement, essaye d'enlever l'alignement de la première colonne "lvwColumnLeft ", car il est automatiquement a gauche.

Cordialement.

[Cocotte278]

Bonjour !

Ca ne fonctionne toujours pas

Toujours le même message d'erreur :

erreur 35604 : la première colonne d'un contrôle ListView doit être alignée à gauche !!!

Quelqu'un peut-il m'éclairer svp ?

[Cocotte278]

J'ai trouvé mon erreur, elle était sur une autre ListView...

Dsl...

Merci...

PS : dommage qu'on ne puisse pas centrer la première colonne...