Add Forms Listview en VBA

[YANN-56]

Bonsoir à tous

Suivant les fichiers existants dans un dossier,
j’ajoute des pages dans mon Multipage

Set Pge = UserForm1.Controls("MultiPage" & 1).pages.Add

Sur ces pages que je dois ajouter à chacune une Listview

Je le fais sans problème pour un label, bouton et autre comme ici :

Set LBLMPG = UserForm1.Controls("MultiPage" & 1).pages(j).Add("Forms.Label.1", , True)

Sauf que pour la forme “Listview” je me fait jeter!

Dans l’aide, ils parlent de « Propriété Designer » de mso extensiblité,
mais je n’y pige rien

Si une bonne âme pouvait m’aider..

Merci d’avance.

Bonne soirée

Yann

 

[MichelXld]

Re : Add Forms Listview en VBA

Bonsoir


Le contrôle ListView fait partie d'une autre bibliothèque :

Dim LBLMPG As Object
Set LBLMPG = UserForm1.Controls("MultiPage" & 1). _
    Pages(0).Add("MSComctlLib.ListViewCtrl.2", , True)

bonne soirée
michel
Microsoft Excel MVP

 

[YANN-56]

Re : Add Forms Listview en VBA

Merci MICHEL

Je viens de tester après l'étape supérieure de la
création des pages.. Cela fonctionne, y compris
la mise en forme des listViews.

Chaque page a sa liste en bonne et due forme.

Je prends quand même conscience de ce que je ne pouvais
que très difficilement (Sinon plus) trouver tout seul...!

Trés sincèrement tu me donnes envie d'avancer.

Bravo pour tout ce que tu fais sur ce site.

Au plaisir de t'y rencontrer.

Yann