appel "variable" de userform

[fba]

Bonjour,
Je dois appeler, selon la saisie d'une date, le bon userform dans n userform existants.
La structure de nom est: préfixe = date, constante = lenom -->ex: 05092002lenom.
Comment réaliser le ".Show" du userform concerné , sans réaliser une routine avec des "case" ou "if" ?
Peut-on creer le nom MyNom et faire l'appel MyNom.Show., ce que je ne sais pas faire.
Merci de vos réponses.

 

[Fred]

Slt, tu ne pourras pas mettre de / dans le nom du userform

 

[STéphane]

j'ai fait un test mais cela ne marche pas.

t = "userform2"
MsgBox Application.VBE.ActiveVBProject.VBComponents.Item(t).Name
Set usf = Application.VBE.ActiveVBProject.VBComponents.Item(t)
'Application.VBE.ActiveVBProject.VBComponents.Item(t).Activate
Evaluate (Application.VBE.ActiveVBProject.VBComponents.Item(t).Name & ".Show")


sniff cela ne marche pas :-(

 

[STéphane]

bonjour


il y a peut-être beaucoup plus simple.
Je me suis inspiré d'un poste de laurent sur le MPFE (groupe de discussion hébergé sur un serveur de microsoft : <news://msnews.microsoft.com/microsoft.public.fr.excel>


bye
Stéphane

 

[fba]

Merci,
J'étais perdu ! me revoilà. La lecture des messages m'a oxygéné la tête.
Voici comment j'ai regle le problème (pièce ci-jointe).

 

[STéphane]

bonjour fba,

malin !
bien joué.

je ne sais pas toutefois si c'est une bonnechosede renommer ton formulaire.


bye
Stéphane