Discussion :

[fred65200]

bonjour,

Je cherche à créer un userform dynamiquement par macro, je n'ai aucun problème pour créer des boutons, labels, etc mais je ne trouve pas la syntaxe pour insérer un contrôle ImageList

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

  Set mewObj = ufTemp.Designer.Controls.Add("Forms.ImageList.1", "ImageList1")

J'obtiens l'erreur «Chaîne de classe incorrecte»

Merci

EDIT ce doit être du type

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
  Set mewObj = ufTemp.Designer.Controls.Add("MSCOMCTLlib.#####", "imagelist1")

ce qu'il me manque c'est le #####

[fred65200]

Comme d'habitude, il suffit de poser la question pour trouver la réponse

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

  Set mewObj = ufTemp.Designer.Controls.Add("MSCOMCTLlib.ImageListCtrl", "imagelist1")

fred