Passation d'un userform en tant qu'argument d'une fonction!

marie338 Messages postés 1 Date d'inscription lundi 5 août 2002 Statut Membre Dernière intervention 5 août 2002 - 5 août 2002 à 14:45
alibault Messages postés 1 Date d'inscription jeudi 23 octobre 2003 Statut Membre Dernière intervention 21 novembre 2005 - 21 nov. 2005 à 15:23
Bonjour!
La situation:
Excel 2000 et VBA
J'ai 2 userforms avec chacun les mêmes éléments (i.e. boutons, textfields, labels, ...). Pour simplifier imaginons que je dois remplir ces userforms avant de les afficher.
Exemple: une textfield "titre" existe dans les 2 userforms. Je veux remplir ce champ:

userform1.titre.value="Test"
userform2.titre.value="Test".

Mon problème:
J'aimerais appeler une fonction "remplir(quelleBoite)" où l'argument "quelleBoite" serait l'objet userform1 ou userform2. Un truc du genre: J'appelle
remplir(userform1)
qui lance
sub remplir(quelleBoite)
quelleBoite.titre.value="Test"
end sub

Et ca ca ne marche pas! Dois-je spécifier un type de données (as Object???)
Comment faire??
Merci 1000x pour votre aide et bonne journée!
M.

2 réponses

dirichle Messages postés 56 Date d'inscription mardi 12 mars 2002 Statut Membre Dernière intervention 5 août 2002
5 août 2002 à 21:13
sub remplir(quelle boite as object)
ou
sub remplir(quelle boite as userform)
0
alibault Messages postés 1 Date d'inscription jeudi 23 octobre 2003 Statut Membre Dernière intervention 21 novembre 2005
21 nov. 2005 à 15:23
çà marche pas çà.

moi aussi je cherche comment faire.
quelqu'un a une idée ?
0
Rejoignez-nous