Discussion :

[dalmasma]

Bonjour,

J'essaye d'attribuer à une variable de type UserForm un autre UserForm dont le nom est un String.

J'ai crée une classe Piece ayant entre autres la propriété Typ
Des formulaires existent pour chaque type de pièce et portent le nom du type.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
' 
 
Public FormulairePrincipal As UserForm
 
'-------------------------------------------------------------------
'INITIALISATION
Sub init(PieceAuto As Piece)
 
    MaPiece = PieceAuto
    'Et là c'est le drame, il me faudrait une méthode UserFormDontLeNomEst
    FormulairePrincipal = UserFormDontLeNomEst(MaPiece.Typ)
 
End Sub

Cette discussion ressemble un peu à celle-ci http://www.developpez.net/forums/d36...aide-variable/ mais je ne vois pas comment l'adapter.

Merci d'avance

[=JBO=]

Bonjour,

Tu n'es pas très précis.
Le UserForm est-il déjà ouvert ou bien cherches-tu à ouvrir un UserForm ?

Je fais l'hypothèse que tu veux ouvrir un UserForm dont le nom est connu:

Code VBA :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Option Explicit
 
Public FormulairePrincipal As UserForm
 
'-------------------------------------------------------------------
'INITIALISATION
Sub init(PieceAuto As Piece)
 
    MaPiece = PieceAuto
    'Et là, plus de drame ;-)
    Set FormulairePrincipal = UserForms.Add(MaPiece.Typ)
 
End Sub

[dalmasma]

Oui, le UserForm est connu. Mais je ne cherche pas encore à l'ouvrir.

Je veux ouvrir FormulairePrincipal qui aura pris la valeur du formulaire que je veux ouvrir.

UserForms.Add(blahblah) est bien objet UserForm qui porte le nom blahblah (j'ai vérifié parce que je ne trouvais pas le nom de la méthode explicite... add et rien ne s'ajoute ...)

Plus de problème de compilation, Merci JBO