XL 2010 Afficher un TCD dans un UserForm

[Ommagawi]

Pour afficher un TCD dans un UserForm je mets ceci :

Private Sub UserForm_Initialize()
Me.ListBox1.RowSource = Sheets("nom_feuille").PivotTables("TCD").TableRange1.Address
End Sub

Il n'y a que la première colonne du TCD qui s'affiche !
Que fautil rajouter ?
Merci.

 

[Compte Supprimé 979]

BONJOUR

Lorsque vous commencez un fil de discussion et que vous posez une question sur le forum, il est de bon ton d'utiliser les formules de politesse usuelles.

Dites systématiquement "Bonjour" avant de poser vos questions car ici on se comporte comme dans la vrai vie.
Vous pouvez aussi conclure vos messages par un "Merci d'avance", ou "Bonne journée", cela ne sera pas de trop .

Une fois que vous aurez commencé à interagir au sein d'un fil existant vous pourrez faire preuve de moins de formalisme.

Merci d'en prendre bonne note afin que ce forum reste accueillant et convivial!

Profitez en pour relire la charte.

Bonne journée

 

[Ommagawi]

Bonjour,
Ci-joint un fichier pour essayer de résoudre mon problème.
Merci d'avance et bonne journée.

 

[job75]

Bonjour Ommagawl, Bruno,

La propriété ColumnCount de ListBox1 est à 1, mettez-la à 2.

A+

 

[Ommagawi]

Merci beaucoup Job75. C'est la première fois que j'utilise les ListBox.
Bonne journée.

 

[job75]

La solution doit être indiquée sur mon post #4, pas sur votre post #5 puisque vous n'avez rien trouvé !