Discussion :

[peofofo]

Bonjour a tous,

Je cherche a transférer une variable d'un userform a un autre.
Pour cela je déclare public la variable que je souhaite transférer.
Mais ceci ne fonctionne pas.
Voici mon code.
Bouton de la feuille :

Code :

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

1
2
3
Private Sub CommandButton1_Click()
UserForm1.Show
End Sub

Code UserForm1 :

Code :

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

1
2
3
4
Private Sub CommandButton1_Click()
var = 5
UserForm2.Show
End Sub

Code UserForm2

Code :

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

1
2
3
4
Public var As Long
Private Sub CommandButton1_Click()
MsgBox ("" & var & "")
End Sub

Le problème est que var vaut 0 alors qu'il devrait être de 5.
Si vous avez des idées

[Invité]

Bonjour

Il faut déclarer ta variable en Public dans un module, comme cela tu y aura accès dans tout ton projet.

Philippe

[Pierre Fauconnier]

Bonjour

Solution 1: Déclarer Var publique dans un module standard (pas dans le module de userform1). De ce fait, la variable sera disponible pour tous les modules du classeur.

Solution 2: Si la variable est déclarée public dans le module du userform2, cela en fait une propriété publique de UserForm2. Il faut donc la préfixer du nom du module lorsque tu l'utilises dans un autre module que userform2.

Ton code dans UserForm1 devient donc

Code :

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

1
2
3
4
Private Sub CommandButton1_Click()
UserForm2.var = 5
UserForm2.Show
End Sub

[peofofo]

Merci Pierre, philippe pour ses explications.
Mon problème est résolu