Userform non-modal & Accès au modèle objet du projet VBA
Salut à tous !
Je pose mon problème ici dans un ultime et dernier espoir...
Le problème est simple mais inexplicable :
1- Création d'un Userform affiché en non-modal - de façon a pouvoir continuer à agir sur Excel normalement.
2- Création d'un bouton qui exécute du code contenant un accès au modèle objet du projet VBA. Par exemple :
Code:
1
2
3
4
5
6
7
|
Set module_temp = ActiveWorkbook.VBProject.VBComponents("mon_module")
With module_temp.CodeModule
lineNumber = .CountOfLines
.InsertLines lineNumber + 1, "sub toto()"
.InsertLines lineNumber + 2, "End sub"
End with |
3- A l'exécution du code ci-dessus l'Userform va disparaitre sans raisons, ni erreurs.
NB :
- Lorsque l'Userform est affiché en modal par contre, il n'y a pas de problème de disparition.... mais en non-modal ce serait mieux !
Si vous avez une quelconque idée sur cette étrangeté...
Merci
