Discussion :

[JOHN14]

Bonjours a tous,

Je voudrais savoir comment passer des paramètres de la fonction appelante au UserForm appelé.

Merci

[Dolphy35]

Salut,

Que veux-tu faire exactement ?

Sinon variable Public.

Dolphy

[JOHN14]

Ce que je veux faire :
Passer des valeurs à un Userform lors de son initialisation.
(J'ai essayé de mettre des paramètres dans "UserForm_Initialize()" mais ça ne marche pas!). Depuis j'ai trouvé une solution :

Code :

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

1
2
3
4
5
6
7
8
9
10
sub MaFontionAppelante()
Dim X
 
Load MonUFM
with MonUFM
.UnObjet = X  'Passage (allé) de la valeur
.Show
X = .UnObjet = X  'Passage (retour) de la valeur
end with
end sub

Aurais-tu autre chose à me proposer ?

[ouskel'n'or]

Si X est un boolean, la forme utilisée est "cohérente"... Quant à savoir si ça fonctionne (?...)
Tu as une façon plus simple de faire les choses et que t'indique Dolphy35, la variable publique que tu déclares dans le module qui ouvre ton userform

Code :

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

1
2
3
4
5
6
7
Public X as (type)
sub LaProcédureAppelante()
     X = "CeQueTuVeux"
     Load MonUFM
     MonUFM.Show
     Msgbox X 'devenu autre chose (as type de départ)
end sub

[JOHN14]

Merci de vos réponses.

Il a donc plusieurs possibilités :

1. Recours à desvariables globales
2. Chargement en mémoire de l'UFM et modification des variables objets avant affichage

C'est au choix. Je considère le problème comme résolu.
A+