Partie du code.
----------------------------------------
'Définir la plage source
Set rngData = wksSource.Range("A1").CurrentRegion
'Ajouter les en-têtes de colonne
For Each rngCell In rngData.Rows(1).Cells
Me.ListView1.ColumnHeaders.Add Text:=rngCell.Value, Width:=80
', Alignment:=2
Next rngCell
------------------------------------------
Pas de PB ca fonctionne bien.
Par contre si je rajoute Alignment:=2 pour aligner le texte j'ai un
message d'erreur qui me dit
impossible d'aligner la colonne 1 qui doit rester aligner à gauche:
Question: comment faire pour aligner les autres colonnes au centre ?