Transférer une variable d'un userform a un autre

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:

---

1 2 3

Private Sub CommandButton1_Click() UserForm1.Show End Sub

---

Code UserForm1 :

Code:

---

1 2 3 4

Private Sub CommandButton1_Click() var = 5 UserForm2.Show End Sub

---

Code UserForm2

Code:

---

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:?

Bonjour

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

Philippe

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:

---

1 2 3 4

Private Sub CommandButton1_Click() UserForm2.var = 5 UserForm2.Show End Sub

---

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