Discussion :

[alainpinpin]

bonjour,
je voudrais "exporter" un UserForm dans un nouveau classeur. J'ai déjà fait le même style de manipulation pour exporter - importer un Module dans un nouveau classeur. Pour cela, je fais :

Code :

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

1
2
3
4
5
6
Set modObj = Application.VBE.ActiveVBProject.VBComponents.Item("modPrintPDF")
    strCode = modObj.CodeModule.Lines(1, modObj.CodeModule.CountOfLines)
 
Application.VBE.ActiveVBProject.VBComponents.Add (vbext_ct_StdModule)
    ' Add code to new module from string variable.
    Application.VBE.ActiveVBProject.VBComponents.Item("Module1").CodeModule.AddFromString (strCode)

En repartant de ce principe, je n'ai pas réussi à faire de même pour un UserForm. Pourriez vous m'aider, ou, le cas échéant, me lancer sur une piste qui permettrait de faire ce que je désire.

Merci d'avance

Alain

[aalex_38]

Un post très intéressant ici

[alainpinpin]

rien de moins... compliqué? parce que ca me semble etre une usine à gaz, juste pour exporter un module existant et le réimporter dans un nouveau classeur!

[aalex_38]

Un lien intéressant ici

[alainpinpin]

Merci beaucoup c'est exactement ce que je cherchais! j'avais trouvé quelque chose dans la même idée, mais ça ne fonctionnait pas, le code était incomplet.

merci aalex_38

[aalex_38]

Je t'en prie, ça fait plaisir, il y a aussi un programme pour un traitement en lot très intéressant de Fred65200 ici