Bonjour,

Je cherche à faire un QCM dynamique à partir d'une feuille EXCEL (pour ne plus avoir à m'en occuper une fois livrée, l'utilisateur ne connaissant pas VBA).

J'ai donc un formulaire avec une grande Frame (frame1) dans laquelle vont venir s'inscrire d'autres frame avec une question en "Label" et deux boutons "oui" et "non".

Je commence tout juste et j'ai déjà un soucis. Dans UserForm_Activate
si je met le code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Dim Obj As Control
Set Obj = Me.Controls("Frame1").Add("forms.Frame.1")
With Obj
        .Name = "Frm" & 1
        .Caption = "xxxxxx"
        .Left = 6
        .Top = 6
        .Width = 366
        .Height = 54
End With
Sur la ligne set Obj, j'ai l'erreur :
-2147417848 (80010108)
Erreur Automation
L'objet invoké s'est déconnecté de ses clients.

Je passe alors en mode débogage et je change la ligne comme suit :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
Set Obj = Me.Controls("Frame1").Add("forms.Label.1")
et le F8 fonctionne !
Le label est bien inséré dans la Frame

Y a t-il une contre-indication à gérer en dynamique une frame dans une frame ?

Par avance, merci.