Discussion :

[jppei]

Bonjour,
J'ai lu cette contribution.
Faut-il une version minimale d’Excel ou d’OS pour faire tourner cette routine.
Je cherche à générer à la volée des contrôles sur un UserForme plutôt que de les créer au départ et de rendre visibles ceux dont j’aurai besoin.
La création des contrôles et la maîtrise de leurs propriétés fonctionnent bien, sauf que je n’arrive pas intercepter les événements.
J’ai bien entendu inséré dans la feuille du code du UserForme un certain nombre de d’appel de programme, mais rien ne réagit au clic :

Code :

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

1
2
3
Private Sub CheckBox1_Click()
Private Sub NomDonneAuControl_Click()
Private Sub NomDArrayAssocieAuControl_Click(ByVal Index As Integer)

Ma recherche sur le web m’a conduit à ton exemple qui semble apporter une solution.

Mais en insérant tel quel le code dans un module d’un nouveau fichier Excel, il bloque déjà à « ThisWorkbook.VBProject ». En debug, lorsque je regarde les propriétés d’« ActiveWorkbook », « VBProject » indique : « L’accès par programme au projet Visual Basic n’est pas fiable ».

Par ailleurs, « CodeModule » ne me semble pas accessible sur un UserForme existant.

Aussi, peut-être est-ce lié au fait que je suis sur Excel 2003 en XP Pro ?

Merci d’avance pour ta réponse.

[kiki29]

Salut, voir et assimiler ceci