Renommer un UserForm

[floon]

Bonjour a tous,

Ca fait un bon moment que je n'ai pas poser de question, la fonction recherche me suffisant amplement en général 😀

Mais je me heurte a un problème :
Je cherche a créer un classeur a partir d'un autre et a transférer des UserForms.

Le hic c'est que j'aurai besoin de renommer un UserForm une fois le transfert effectué.

Et je n'y arrive pas !
j'ai tenté un

ActiveWorkbook.VBProject.VBComponents("tata").name "toto"

Marche pas !

Du coup je me suis dit que c'était pas grave je n'avais qu'a modifier mon code vba a travers une macro pour appeler le bon UserForm

Mais je n'y arrive pas plus ( j'ai rien trouvé sur ce sujet )🙁

est-ce quelqu'un a une idée ?
Merci d'avance

 

[Pierrot93]

Re : Renommer un UserForm

Bonjour flon

essaye le code ci-dessous, fonctionne chez moi(excel 2003), à placer dans un module standard. Attention, la case "faire confiance au projet visual basic" doit être cochée, pour ce faire barre de menu excel => outils => macro=>sécurité.

ActiveWorkbook.VBProject.VBComponents("UserForm1").Name [COLOR="Red"][B]=[/B][/COLOR] "toto"

A noter que pour faire référence à ton usf, dans le module de celui-ci, tu peux utiliser me à la place de son nom...

bon dimanche
@+